./src/extract_sig.c:vrline * vrtable = NIL,  /* pointers to first and last table entries */
./src/extract_sig.c:       * vrtend  = NIL;
./src/extract_sig.c:	vrtable -> vr_next = NIL;
Binary file ./src/Rc matches
./src/pass5d/is_int_const.c:    if (Int_string_code == NIL) {
./src/pass5d/is_int_const.c:    plus_sig = getcomp(tsig, id_plus, NIL, NIL, NIL, NIL, FALSE);
./src/pass5d/is_int_const.c:    times_sig = getcomp(tsig, id_times, NIL, NIL, NIL, NIL, FALSE);
./src/pass5d/is_int_const.c:    if (Int_add_code == NIL) {
./src/pass5d/is_int_const.c:    if (Int_mul_code == NIL) {
./src/pass5d/is_int_const.c:	    if (decl == NIL /* selection */
./src/pass5d/trace.c:      if (put_sel != NIL) {
./src/pass5d/compile_stubs.c:    boolean need_closure = (constr == NIL
./src/pass5d/compile_stubs.c:    boolean discard_ar = (constr != NIL
./src/pass5d/compile_stubs.c:      if (constr != NIL) {
./src/pass5d/appl.c:	    return(comp_st(p, var_Void, NIL, NIL) == 0);
./src/pass5d/appl.c:    if (l != NIL) {
./src/pass5d/appl.c:	    && p -> sel_type == NIL
./src/pass5d/appl.c:    struct RIC_instr * in_line;     /* in-line code, NIL if not known */
./src/pass5d/appl.c:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c:      if (in_line == NIL) {
./src/pass5d/appl.c:      if (construction != NIL) {
./src/pass5d/appl.c:    if (fflag && construction == NIL
./src/pass5d/appl.c:    if (in_line != NIL) {
./src/pass5d/appl.c:		&& s -> sel_type == NIL
./src/pass5d/appl.c:      slink_needed = ((construction == NIL)
./src/pass5d/appl.c:      bogus_slink_ok = (construction != NIL &&
./src/pass5d/appl.c:      direct_rec_call = (last_expr && (construction != NIL)
./src/pass5d/appl.c:			   && construction != NIL
./src/pass5d/appl.c:	if (construction == NIL) {
./src/pass5d/appl.c:      if (construction != NIL) {
./src/pass5d/appl.c:	if (construction == NIL
./src/pass5d/appl.c:	  if (construction != NIL) {
./src/pass5d/appl.c:	    if (construction == NIL) {
./src/pass5d/appl.c:	    if (construction == NIL) {
./src/pass5d/appl.c:	  } else if (construction == NIL || !slink_known) {
./src/pass5d/appl.c:	    if (construction != NIL) {
./src/pass5d/appl.c:	    } else /* NIL construction */ {
./src/pass5d/appl.c:		    if (construction != NIL) {
./src/pass5d/appl.c:	if (construction == NIL
./src/pass5d/appl.c:	  if (op -> kind != LETTERID || op -> sel_type == NIL) {
./src/pass5d/appl.c:	  size_sig = getcomp(sel_type_sig, id_size, NIL, NIL,
./src/pass5d/appl.c:			     NIL, NIL, NIL, FALSE);
./src/pass5d/appl.c:	  if (size_sig == NIL || special_tp(size_sig -> fsig_special)
./src/pass5d/cl_analyze.c:	    if (p -> sel_type == NIL) {
./src/pass5d/cl_analyze.c:    if (p == NIL) return;
./src/pass5d/cl_analyze.c:		if (p -> sel_type != NIL) {
./src/pass5d/cl_analyze.c:		    if (lst && constr != NIL
./src/pass5d/cl_analyze.c:			     && (op_sig -> fsig_inline_code != NIL
./src/pass5d/cl_analyze.c:				 || (constr != NIL &&
./src/pass5d/cl_analyze.c:			      && constr != NIL
./src/pass5d/cl_analyze.c:			if (current_free_ids != NIL) {
./src/pass5d/cl_analyze.c:			if (Vflag && old_fc != NIL) {
./src/pass5d/cl_analyze.c:		    if (current_fc != NIL) {
./src/pass5d/cl_analyze.c:		if (p -> mp_type_modifier != NIL
./src/pass5d/cl_analyze.c:		    if (tsig -> ts_string_code != NIL
./src/pass5d/cl_analyze.c:			&& tsig -> ts_element_code != NIL
./src/pass5d/type_constr.c:		if (dcs -> dcs_exceptions != NIL) {
./src/pass5d/ident.c~:/* Return either NIL or an expression q such that p is */
./src/pass5d/ident.c~:      if (p -> sel_type == NIL ) {
./src/pass5d/ident.c~:	    || q -> sel_type != NIL
./src/pass5d/ident.c~:      } else /* p -> sel_type != NIL */ {
./src/pass5d/ident.c~:	    && (p -> signature -> fsig_construction != NIL
./src/pass5d/ident.c~:		|| p -> signature -> fsig_inline_code != NIL)) {
./src/pass5d/ident.c~:					  p -> sel_type, NIL, NIL, NIL, TRUE);
./src/pass5d/ident.c~:	    if (new_id -> signature == NIL) {
./src/pass5d/ident.c~:    if (p -> sel_type == NIL) {
./src/pass5d/ident.c~:	ASSERT2 (v != NIL, "ident: id %s not declared\n", 
./src/pass5d/ident.c~:	new_sig = getcomp(type_sig, id_New, NIL,
./src/pass5d/ident.c~:			  NIL, NIL, NIL, FALSE);
./src/pass5d/ident.c~:	    if (new_sig == NIL) {
./src/pass5d/ident.c~:	if (new_sig == NIL
./src/pass5d/ident.c:/* Return either NIL or an expression q such that p is */
./src/pass5d/ident.c:      if (p -> sel_type == NIL ) {
./src/pass5d/ident.c:	    || q -> sel_type != NIL
./src/pass5d/ident.c:      } else /* p -> sel_type != NIL */ {
./src/pass5d/ident.c:	    && (p -> signature -> fsig_construction != NIL
./src/pass5d/ident.c:		|| p -> signature -> fsig_inline_code != NIL)) {
./src/pass5d/ident.c:					  p -> sel_type, NIL, NIL, NIL, TRUE);
./src/pass5d/ident.c:	    if (new_id -> signature == NIL) {
./src/pass5d/ident.c:    if (p -> sel_type == NIL) {
./src/pass5d/ident.c:	ASSERT2 (v != NIL, "ident: id %s not declared\n", 
./src/pass5d/ident.c:	new_sig = getcomp(type_sig, id_New, NIL,
./src/pass5d/ident.c:			  NIL, NIL, NIL, FALSE);
./src/pass5d/ident.c:	    if (new_sig == NIL) {
./src/pass5d/ident.c:	if (new_sig == NIL
./src/pass5d/find_inline.c:    if (fsig -> fsig_inline_code != NIL) return;
./src/pass5d/find_inline.c:	    if (Vflag && fsig -> fsig_inline_code != NIL) {
./src/pass5d/find_inline.c:		if (fc -> fc_code_label == NIL) {
./src/pass5d/find_inline.c:/* rloc.  Returns NIL if things get too messy.                         */
./src/pass5d/find_inline.c:	    if (expr -> sel_type != NIL
./src/pass5d/find_inline.c:		return(NIL);
./src/pass5d/find_inline.c:		return(NIL);
./src/pass5d/find_inline.c:		    return(NIL);
./src/pass5d/find_inline.c:		struct RIC_instr * inline_code = NIL;
./src/pass5d/find_inline.c:		if (op_sig -> fsig_inline_code == NIL) {
./src/pass5d/find_inline.c:		    return(NIL);
./src/pass5d/find_inline.c:		    return(NIL);
./src/pass5d/find_inline.c:			if (arg_code == NIL) {
./src/pass5d/find_inline.c:			    return(NIL);
./src/pass5d/find_inline.c:		  udc_code = NIL;
./src/pass5d/find_inline.c:	    return(NIL);
./src/pass5d/find_inline.c:	    if (val > MAX_PROD_EXP_LEN) return(NIL);
./src/pass5d/find_inline.c:	    return(NIL);
./src/pass5d/traverse.c:    if (p == NIL) return;
./src/pass5d/traverse.c:		if (p -> sel_type != NIL) {
./src/pass5d/traverse.c:		    if (p -> mp_type_modifier != NIL
./src/pass5d/RIC.c:# define NIL 0
./src/pass5d/RIC.c:    while (ce != NIL) {
./src/pass5d/RIC.c:    struct RIC_instr *first = NIL;
./src/pass5d/RIC.c:    struct RIC_instr *last = NIL;
./src/pass5d/RIC.c:    struct RIC_instr *q = NIL;
./src/pass5d/RIC.c:	if (first == NIL) {
./src/pass5d/RIC.c:    last -> next_instr = NIL;
./src/pass5d/RIC.c:    while (p != NIL) {
./src/pass5d/RIC.c~:# define NIL 0
./src/pass5d/RIC.c~:    while (ce != NIL) {
./src/pass5d/RIC.c~:    struct RIC_instr *first = NIL;
./src/pass5d/RIC.c~:    struct RIC_instr *last = NIL;
./src/pass5d/RIC.c~:    struct RIC_instr *q = NIL;
./src/pass5d/RIC.c~:	if (first == NIL) {
./src/pass5d/RIC.c~:    last -> next_instr = NIL;
./src/pass5d/RIC.c~:    while (p != NIL) {
./src/pass5d/appl.c~:	    return(comp_st(p, var_Void, NIL, NIL) == 0);
./src/pass5d/appl.c~:    if (l != NIL) {
./src/pass5d/appl.c~:	    && p -> sel_type == NIL
./src/pass5d/appl.c~:    struct RIC_instr * in_line;     /* in-line code, NIL if not known */
./src/pass5d/appl.c~:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c~:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c~:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c~:		|| arg1 -> sel_type != NIL) {
./src/pass5d/appl.c~:      if (in_line == NIL) {
./src/pass5d/appl.c~:      if (construction != NIL) {
./src/pass5d/appl.c~:    if (fflag && construction == NIL
./src/pass5d/appl.c~:    if (in_line != NIL) {
./src/pass5d/appl.c~:		&& s -> sel_type == NIL
./src/pass5d/appl.c~:      slink_needed = ((construction == NIL)
./src/pass5d/appl.c~:      bogus_slink_ok = (construction != NIL &&
./src/pass5d/appl.c~:      direct_rec_call = (last_expr && (construction != NIL)
./src/pass5d/appl.c~:			   && construction != NIL
./src/pass5d/appl.c~:	if (construction == NIL) {
./src/pass5d/appl.c~:      if (construction != NIL) {
./src/pass5d/appl.c~:	if (construction == NIL
./src/pass5d/appl.c~:	  if (construction != NIL) {
./src/pass5d/appl.c~:	    if (construction == NIL) {
./src/pass5d/appl.c~:	    if (construction == NIL) {
./src/pass5d/appl.c~:	  } else if (construction == NIL || !slink_known) {
./src/pass5d/appl.c~:	    if (construction != NIL) {
./src/pass5d/appl.c~:	    } else /* NIL construction */ {
./src/pass5d/appl.c~:		    if (construction != NIL) {
./src/pass5d/appl.c~:	if (construction == NIL
./src/pass5d/appl.c~:	  if (op -> kind != LETTERID || op -> sel_type == NIL) {
./src/pass5d/appl.c~:	  size_sig = getcomp(sel_type_sig, id_size, NIL, NIL,
./src/pass5d/appl.c~:			     NIL, NIL, NIL, FALSE);
./src/pass5d/appl.c~:	  if (size_sig == NIL || special_tp(size_sig -> fsig_special)
./src/pass5d/sl_analyze.c:    if (p == NIL) return;
./src/pass5d/sl_analyze.c:		if (p -> sel_type != NIL) {
./src/pass5d/sl_analyze.c:			     && (op_sig -> fsig_inline_code != NIL
./src/pass5d/sl_analyze.c:				 || (constr != NIL &&
./src/pass5d/sl_analyze.c:			      && constr != NIL && op_sig -> fsig_slink_known) {
./src/pass5d/sl_analyze.c:				   constr == NIL? -1 : constr -> ar_static_level);
./src/pass5d/sl_analyze.c:			if (old_blk != NIL
./src/pass5d/sl_analyze.c:		    if (current_fc != NIL) {
./src/pass5d/sl_analyze.c:		if (p -> mp_type_modifier != NIL
./src/pass5d/sl_analyze.c:		    if (tsig -> ts_string_code != NIL
./src/pass5d/sl_analyze.c:			&& tsig -> ts_element_code != NIL
./src/pass5d/codegen.c:fc_entry * Gfc_list = NIL;
./src/pass5d/codegen.c:    while (Gfc_list != NIL) {
./src/pass5d/codegen.c:		    know_inline = (sig -> ts_string_code != NIL 
./src/pass5d/codegen.c:				   && sig -> ts_element_code != NIL
./src/pass5d/codegen.c:		    boolean is_wl = (tm == NIL? FALSE
./src/pass5d/codegen.c:                          /* s := first element of with list, NIL if there */
./src/pass5d/codegen.c:			      s = NIL;
./src/pass5d/codegen.c:			  while (s != NIL || i < orig) {
./src/pass5d/codegen.c:			    if (s != NIL && s -> decl_sel_index == res_pos) {
./src/pass5d/var_in_reg.c:	for (p = equiv_regs; p != NIL; p = cn_tail(p)) {
./src/pass5d/var_in_reg.c:    while (p != NIL) {
./src/pass5d/var_in_reg.c:    equiv_regs = NIL;
./src/pass5d/var_in_reg.c:    equiv_regs = cn_cons(this_arg, NIL);
./src/pass5d/sl_analyze.c~:    if (p == NIL) return;
./src/pass5d/sl_analyze.c~:		if (p -> sel_type != NIL) {
./src/pass5d/sl_analyze.c~:			     && (op_sig -> fsig_inline_code != NIL
./src/pass5d/sl_analyze.c~:				 || (constr != NIL &&
./src/pass5d/sl_analyze.c~:			      && constr != NIL && op_sig -> fsig_slink_known) {
./src/pass5d/sl_analyze.c~:				   constr == NIL? -1 : constr -> ar_static_level);
./src/pass5d/sl_analyze.c~:			if (old_blk != NIL
./src/pass5d/sl_analyze.c~:		    if (current_fc != NIL) {
./src/pass5d/sl_analyze.c~:		if (p -> mp_type_modifier != NIL
./src/pass5d/sl_analyze.c~:		    if (tsig -> ts_string_code != NIL
./src/pass5d/sl_analyze.c~:			&& tsig -> ts_element_code != NIL
./src/main.save.rb:# define NIL ((NODE *)0)
./src/RIC_to_C/tmp_tab.c:#define TL_NIL ((tl *) 0)
./src/RIC_to_C/tmp_tab.c:    for (p = rmd_tmps; p  != TL_NIL; p = p -> tl_next) {
./src/RIC_to_C/tmp_tab.c:    rmd_tmps = TL_NIL;
Binary file ./src/RIC_to_C/to_C matches
./src/RIC_to_C/strings.h:# define CS_NIL ((char *)0)
./src/RIC_to_C/strings.c~:    p -> first_part = CS_NIL;
./src/RIC_to_C/strings.c~:    if (s == CS_NIL) return;
./src/RIC_to_C/strings.c:    p -> first_part = CS_NIL;
./src/RIC_to_C/strings.c:    if (s == CS_NIL) return;
./src/RIC_to_C/Omain.c:		    /* in lm_expr.  CS_NIL if slm is not        */
./src/RIC_to_C/Omain.c:		    /* Slm_ph is always CS_NIL if slm is either */
./src/RIC_to_C/Omain.c:    if (lbl != CS_NIL) {
./src/RIC_to_C/Omain.c:	if (lbl == CS_NIL) {
./src/RIC_to_C/Omain.c:char * lbr_label = CS_NIL;   /* Label of preceding LBR instruction  */
./src/RIC_to_C/Omain.c:char * lba_label = CS_NIL;   /* Label of preceding LBA instruction  */
./src/RIC_to_C/Omain.c:	    if (slm_ph != CS_NIL) {
./src/RIC_to_C/Omain.c:		slm_ph = CS_NIL;
./src/RIC_to_C/Omain.c:    char * ph = CS_NIL;
./src/RIC_to_C/Omain.c:	if (ph == CS_NIL) {
./src/RIC_to_C/Omain.c:    char * ph = CS_NIL;
./src/RIC_to_C/Omain.c:	slm_ph = CS_NIL;
./src/RIC_to_C/Omain.c:	    label = CS_NIL;
./src/RIC_to_C/Omain.c:			if (slm_ph != CS_NIL) {
./src/RIC_to_C/Omain.c:		if (lba_label == CS_NIL) {
./src/RIC_to_C/Omain.c:		if (lba_label == CS_NIL) {
./src/RIC_to_C/Omain.c:		if (lbr_label != CS_NIL) {
./src/RIC_to_C/Omain.c:		    lbr_label = CS_NIL;
./src/RIC_to_C/Omain.c:		    if (lm != NONE && slm_ph != CS_NIL) {
./src/RIC_to_C/Omain.c:			    slm_ph = CS_NIL;
./src/RIC_to_C/Omain.c:		    char * ph = CS_NIL;
./src/RIC_to_C/Omain.c:			if (ph == CS_NIL) {
./src/RIC_to_C/Omain.c:		    if (fn_name == CS_NIL) {
./src/RIC_to_C/Omain.c:		      fn_name = CS_NIL;
./src/RIC_to_C/Omain.c:		if (lba_label == CS_NIL) {
./src/RIC_to_C/Omain.c:			    if (lm != NONE && slm_ph != CS_NIL) {
./src/RIC_to_C/Omain.c:				slm_ph = CS_NIL;
./src/RIC_to_C/Omain.c:		    if (lba_label == CS_NIL) {
./src/RIC_to_C/Omain.c:	    lba_label = CS_NIL;
./src/RIC_to_C/tables.h:# define add_undef_vr(vr_no) add_vr(vr_no, CS_NIL, 0);
./src/RIC_to_C/loc_tab.c:# define RE_NIL ((struct reg_entry *)0)
./src/RIC_to_C/loc_tab.c:			/* Valid only if tmp_name is not CS_NIL.       */
./src/RIC_to_C/loc_tab.c:			  /* CS_NIL.                                       */
./src/RIC_to_C/loc_tab.c:	for (p = reg_tab[i]; p != RE_NIL; p = p -> next) {
./src/RIC_to_C/loc_tab.c:    if (p -> vr_exp != CS_NIL) {
./src/RIC_to_C/loc_tab.c:	if (p -> tmp_name == CS_NIL) {
./src/RIC_to_C/loc_tab.c:	p -> vr_exp = CS_NIL;
./src/RIC_to_C/loc_tab.c:    if (exp != CS_NIL) {
./src/RIC_to_C/loc_tab.c:    while(p != RE_NIL && p -> vr != vr_no) p = p -> next;
./src/RIC_to_C/loc_tab.c:    if (p == RE_NIL) {
./src/RIC_to_C/loc_tab.c:/* Return the entry corresponding to a given register number, or RE_NIL */
./src/RIC_to_C/loc_tab.c:    while(p != RE_NIL && p -> vr != vr_no) p = p -> next;
./src/RIC_to_C/loc_tab.c:    if (p == RE_NIL) {
./src/RIC_to_C/loc_tab.c:	if (p -> tmp_name == CS_NIL) {
./src/RIC_to_C/loc_tab.c:    if (p == RE_NIL) {
./src/RIC_to_C/loc_tab.c:	if (p -> vr_exp != CS_NIL) {
./src/RIC_to_C/loc_tab.c:	if (p -> tmp_name == CS_NIL) {
./src/RIC_to_C/loc_tab.c:    while(q != RE_NIL && q -> vr != vr_no) q = q -> next;
./src/RIC_to_C/loc_tab.c:    if (q != RE_NIL) {
./src/RIC_to_C/loc_tab.c:    while(p != RE_NIL && p -> vr != vr_no) p = p -> next;
./src/RIC_to_C/loc_tab.c:    if (p == RE_NIL) {
./src/RIC_to_C/loc_tab.c:    while(p != RE_NIL && p -> vr != vr_no) p = p -> next;
./src/RIC_to_C/loc_tab.c:    if (p == RE_NIL) {
./src/RIC_to_C/loc_tab.c:    p -> vr_exp = CS_NIL;
./src/RIC_to_C/loc_tab.c:    while (current != RE_NIL && current -> vr != vr_no) {
./src/RIC_to_C/loc_tab.c:    if (current == RE_NIL) {
./src/RIC_to_C/loc_tab.c:	if (current -> tmp_name != CS_NIL) {
./src/RIC_to_C/loc_tab.c:		current -> vr_exp = CS_NIL;
./src/RIC_to_C/loc_tab.c:# define add_predef(vr_no, name) add_vr(vr_no, name, PREDEF_TMP, CS_NIL);
./src/RIC_to_C/main.c~:		    /* in lm_expr.  CS_NIL if slm is not        */
./src/RIC_to_C/main.c~:		    /* Slm_ph is always CS_NIL if slm is either */
./src/RIC_to_C/main.c~:    if (lbl != CS_NIL) {
./src/RIC_to_C/main.c~:	if (lbl == CS_NIL) {
./src/RIC_to_C/main.c~:char * lbr_label = CS_NIL;   /* Label of preceding LBR instruction  */
./src/RIC_to_C/main.c~:char * lba_label = CS_NIL;   /* Label of preceding LBA instruction  */
./src/RIC_to_C/main.c~:	    if (slm_ph != CS_NIL) {
./src/RIC_to_C/main.c~:		slm_ph = CS_NIL;
./src/RIC_to_C/main.c~:    char * ph = CS_NIL;
./src/RIC_to_C/main.c~:	if (ph == CS_NIL) {
./src/RIC_to_C/main.c~:    char * ph = CS_NIL;
./src/RIC_to_C/main.c~:	slm_ph = CS_NIL;
./src/RIC_to_C/main.c~:	    label = CS_NIL;
./src/RIC_to_C/main.c~:			if (slm_ph != CS_NIL) {
./src/RIC_to_C/main.c~:		if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c~:		if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c~:		if (lbr_label != CS_NIL) {
./src/RIC_to_C/main.c~:		    lbr_label = CS_NIL;
./src/RIC_to_C/main.c~:		    if (lm != NONE && slm_ph != CS_NIL) {
./src/RIC_to_C/main.c~:			    slm_ph = CS_NIL;
./src/RIC_to_C/main.c~:		    char * ph = CS_NIL;
./src/RIC_to_C/main.c~:			if (ph == CS_NIL) {
./src/RIC_to_C/main.c~:		    if (fn_name == CS_NIL) {
./src/RIC_to_C/main.c~:		      fn_name = CS_NIL;
./src/RIC_to_C/main.c~:		if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c~:			    if (lm != NONE && slm_ph != CS_NIL) {
./src/RIC_to_C/main.c~:				slm_ph = CS_NIL;
./src/RIC_to_C/main.c~:		    if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c~:	    lba_label = CS_NIL;
./src/RIC_to_C/main.c:		    /* in lm_expr.  CS_NIL if slm is not        */
./src/RIC_to_C/main.c:		    /* Slm_ph is always CS_NIL if slm is either */
./src/RIC_to_C/main.c:    if (lbl != CS_NIL) {
./src/RIC_to_C/main.c:	if (lbl == CS_NIL) {
./src/RIC_to_C/main.c:char * lbr_label = CS_NIL;   /* Label of preceding LBR instruction  */
./src/RIC_to_C/main.c:char * lba_label = CS_NIL;   /* Label of preceding LBA instruction  */
./src/RIC_to_C/main.c:	    if (slm_ph != CS_NIL) {
./src/RIC_to_C/main.c:		slm_ph = CS_NIL;
./src/RIC_to_C/main.c:    char * ph = CS_NIL;
./src/RIC_to_C/main.c:	if (ph == CS_NIL) {
./src/RIC_to_C/main.c:    char * ph = CS_NIL;
./src/RIC_to_C/main.c:	slm_ph = CS_NIL;
./src/RIC_to_C/main.c:	    label = CS_NIL;
./src/RIC_to_C/main.c:			if (slm_ph != CS_NIL) {
./src/RIC_to_C/main.c:		if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c:		if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c:		if (lbr_label != CS_NIL) {
./src/RIC_to_C/main.c:		    lbr_label = CS_NIL;
./src/RIC_to_C/main.c:		    if (lm != NONE && slm_ph != CS_NIL) {
./src/RIC_to_C/main.c:			    slm_ph = CS_NIL;
./src/RIC_to_C/main.c:		    char * ph = CS_NIL;
./src/RIC_to_C/main.c:			if (ph == CS_NIL) {
./src/RIC_to_C/main.c:		    if (fn_name == CS_NIL) {
./src/RIC_to_C/main.c:		      fn_name = CS_NIL;
./src/RIC_to_C/main.c:		if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c:			    if (lm != NONE && slm_ph != CS_NIL) {
./src/RIC_to_C/main.c:				slm_ph = CS_NIL;
./src/RIC_to_C/main.c:		    if (lba_label == CS_NIL) {
./src/RIC_to_C/main.c:	    lba_label = CS_NIL;
./src/pass4/findapplsig.c~:                            p -> signature = NIL;
./src/pass4/findapplsig.c~:                    if (ext_args == NIL) {
./src/pass4/findapplsig.c~:			  && match_delv != NIL) {
./src/pass4/findapplsig.c~:						NIL,
./src/pass4/findapplsig.c~:                if (op -> signature -> fsig_result_sig == NIL) {
./src/pass4/findapplsig.c~:                chgsig(p, NIL);
./src/pass4/findapplsig.c~:                    if (p -> signature == NIL) {
Binary file ./src/pass4/pass4.o matches
./src/pass4/infer_args.c: * be extended to match params.  If this is false, either NIL or some
./src/pass4/infer_args.c:			val_Integer, NIL, NIL) == 0) {
./src/pass4/infer_args.c:	  return(NIL);
./src/pass4/infer_args.c:	    dummy_id -> signature = NIL;
./src/pass4/infer_args.c:      if (void_decl != NIL) {
./src/pass4/infer_args.c:	    if (comp_st(s -> par_signature, var_Void, NIL, NIL) == 0) {
./src/pass4/infer_args.c:			    arg_to_unify, NIL, NIL) != 0) {
./src/pass4/infer_args.c:		    if(sav_diff_p != NIL && is_dummy(sav_diff_p) &&
./src/pass4/infer_args.c:	return(NIL);
./src/pass4/infer_args.c:	if (s != NIL && 
./src/pass4/infer_args.c~: * be extended to match params.  If this is false, either NIL or some
./src/pass4/infer_args.c~:			val_Integer, NIL, NIL) == 0) {
./src/pass4/infer_args.c~:	  return(NIL);
./src/pass4/infer_args.c~:	    dummy_id -> signature = NIL;
./src/pass4/infer_args.c~:      if (void_decl != NIL) {
./src/pass4/infer_args.c~:	    if (comp_st(s -> par_signature, var_Void, NIL, NIL) == 0) {
./src/pass4/infer_args.c~:			    arg_to_unify, NIL, NIL) != 0) {
./src/pass4/infer_args.c~:		    if(sav_diff_p != NIL && is_dummy(sav_diff_p) &&
./src/pass4/infer_args.c~:	return(NIL);
./src/pass4/infer_args.c~:	if (s != NIL && 
./src/pass4/subst.c: * Otherwise return NIL.
./src/pass4/subst.c:    while(c != NIL) {
./src/pass4/subst.c:    return(NIL);
./src/pass4/subst.c:    if (p == ERR_SIG || p == NIL) return(p);
./src/pass4/subst.c:          if (p -> sel_type != NIL) {
./src/pass4/subst.c:                  chgfld(&(q -> signature), NIL);
./src/pass4/subst.c:		  q -> id_appl = NIL;
./src/pass4/subst.c:	      } else if (p -> id_last_definition != NIL
./src/pass4/subst.c:                                if (on_dontsubst(s) != NIL) {
./src/pass4/subst.c:		      chgfld(&(q -> signature), NIL);
./src/pass4/subst.c:		    q -> id_appl = NIL;
./src/pass4/subst.c:	    if (p -> mp_type_modifier == NIL) {
./src/pass4/subst.c:		chgfld(&(v -> signature), NIL);
./src/pass4/subst.c:		chgfld(&(v -> signature), NIL);
./src/pass4/subst.c:		chgfld(&(v -> signature), NIL);
./src/pass4/subst.c:                chgfld(&(new_prod -> signature), NIL);
./src/pass4/subst.c:		chgfld(&(new_block -> signature), NIL);
./src/pass4/subst.c:            if (p -> sel_type == NIL) {
./src/pass4/subst.c:    if (p == NIL) { return(NIL); }
./src/pass4/subst.c:		if (p -> fc_code_label == NIL) {
./src/pass4/subst.c:	    if (v -> mp_type_modifier != NIL) {
./src/pass4/subst.c:	    if (p -> sel_type == NIL) {
./src/pass4/import.c:NODE * infunc = NIL;     /* innermost enclosing known type or function  */
./src/pass4/import.c:			 /* NIL if there is none.                       */
./src/pass4/import.c:NODE * insig = NIL;      /* enclosing signature, if any                 */
./src/pass4/import.c:/* scope.   (scope may be NIL.)                                              */
./src/pass4/import.c:    if (p == NIL || p == ERR_SIG) return;
./src/pass4/import.c:		infunc = NIL;
./src/pass4/import.c:            if ( p -> sel_type != NIL ) {
./src/pass4/import.c:	      if ((def = p -> id_last_definition) == NIL) {
./src/pass4/import.c:              if (scope != NIL
./src/pass4/import.c:			 && def -> decl_innermost_id != NIL
./src/pass4/import.c:	      if (infunc != NIL) {
./src/pass4/import.c:		if (insig == NIL && has_sig(p) &&
./src/pass4/import.c:	    if (insig == NIL) {
./src/pass4/import.c:	    if (insig == NIL) {
./src/pass4/import.c:                       NIL, NIL) != 0) {
./src/pass4/coerce.c:	chgfld(&(p -> signature), NIL);
./src/pass4/coerce.c:	chgfld(&(p -> signature), NIL);
./src/pass4/findapplsig.c:                            p -> signature = NIL;
./src/pass4/findapplsig.c:                    if (ext_args == NIL) {
./src/pass4/findapplsig.c:			  && match_delv != NIL) {
./src/pass4/findapplsig.c:						NIL,
./src/pass4/findapplsig.c:                if (op -> signature -> fsig_result_sig == NIL) {
./src/pass4/findapplsig.c:                chgsig(p, NIL);
./src/pass4/findapplsig.c:                    if (p -> signature == NIL) {
./src/pass4/getcomp.c: * is pointed to by the second parameter (NIL if there is none).
./src/pass4/getcomp.c:	if (appl != NIL && appl -> kind != APPLICATION) {
./src/pass4/getcomp.c:		if (exp == NIL) {
./src/pass4/getcomp.c:		    if (csig == NIL
./src/pass4/getcomp.c:			    if (appl != NIL) {
./src/pass4/getcomp.c:		      && (exp == NIL ?
./src/pass4/getcomp.c:			    (exp_sig = sig_const, csig == NIL)
./src/pass4/getcomp.c:		    if (sig -> ts_const_code != NIL) {
./src/pass4/getcomp.c:		    } else if (p -> dcs_exceptions != NIL) {
./src/pass4/getcomp.c:    return(NIL);
./src/pass4/getcomp.c:    if (p == ERR_SIG || p == NIL) return(p);
./src/pass4/getcomp.c:	    if (p -> mp_type_modifier == NIL) {
./src/pass4/getcomp.c:		chgfld(&(v -> signature), NIL);
./src/pass4/getcomp.c:		chgfld(&(v -> signature), NIL);
./src/pass4/getcomp.c:		chgfld(&(v -> signature), NIL);
./src/pass4/getcomp.c:                chgfld(&(new_prod -> signature), NIL);
./src/pass4/getcomp.c:		chgfld(&(new_block -> signature), NIL);
./src/pass4/getcomp.c:	    if (p -> id_last_definition != NIL
./src/pass4/getcomp.c:	    if(   p -> sel_type == NIL && p -> id_str_table_index != -1
./src/pass4/getcomp.c:			while(c != NIL) {
./src/pass4/getcomp.c:	    if (p -> sel_type == NIL && p -> id_str_table_index != -1
./src/pass4/getcomp.c:		    chgfld(&(q -> signature), NIL);
./src/pass4/getcomp.c:		q -> id_appl = NIL;
./src/pass4/getcomp.c:            if (p -> sel_type == NIL) {
./src/pass4/getcomp.c:                        chgfld(&(q -> signature), NIL);
./src/pass4/getcomp.c:		    q -> id_appl = NIL;
./src/pass4/getcomp.c:                    tmpcopy[i] = NIL;
./src/pass4/getcomp.c:			       = sig -> ts_element_code = NIL;
./src/pass4/getcomp.c:	    || csig -> fsig_inline_code != NIL
./src/pass4/getcomp.c:	    || csig -> fsig_construction != NIL) {
./src/pass4/getcomp.c:	    if (dcs -> dcs_exceptions == NIL) {
./src/pass4/getcomp.c:	    new_tsc = mknode(TSCOMPONENT, id, NIL);
./src/pass4/getcomp.c:	       if (ctype == NIL) {
./src/pass4/getcomp.c:	    if (p == NIL) { 
./src/pass4/getcomp.c:	    if (p == NIL) { 
./src/pass4/findsig.c:struct cn * dontsubst = NIL; /* list of incompletely expanded nodes  */
./src/pass4/findsig.c: *    If sig_done is originally NIL it is set to SIG_IN_PROGRESS
./src/pass4/findsig.c:	if ( p -> signature != NIL
./src/pass4/findsig.c:		  if(p -> signature == NIL) {
./src/pass4/findsig.c:                    dbgmsg("NIL FUNCCONSTR signature\n");
./src/pass4/findsig.c:		if (q == NIL /* need to fill in result signature */) {
./src/pass4/findsig.c:	                boolean is_void = comp_st(val_Void, q, NIL, NIL) == 0;
./src/pass4/findsig.c:                        && match_delv != NIL) {  /* forget components */
./src/pass4/findsig.c:                                                NIL,
./src/pass4/findsig.c:                                NIL, NIL) == 0) {
./src/pass4/findsig.c:                    good_element = NIL;
./src/pass4/findsig.c:		    if (good_element == NIL || (may_fail && !all_ok)) {
./src/pass4/findsig.c:                                good_element = NIL;
./src/pass4/findsig.c:                                    && s -> ge_element -> signature != NIL) {
./src/pass4/findsig.c:                                    && s -> ge_guard -> signature != NIL) {
./src/pass4/findsig.c:		    /* != NIL                                         */
./src/pass4/findsig.c:			if (good_element == NIL) {
./src/pass4/findsig.c:		if (p -> sel_type == NIL) {
./src/pass4/findsig.c:                    if (sel_sig -> ts_string_code != NIL
./src/pass4/findsig.c:			&& sel_sig -> ts_element_code != NIL
./src/pass4/findsig.c:			&& p -> sel_type -> sel_type == NIL) {
./src/pass4/findsig.c:                        if ((r = on_dontsubst(p -> sel_type)) != NIL) {
./src/pass4/findsig.c:		if (p -> str_expansion == NIL) {
./src/pass4/findsig.c:		    NODE * local_id = p -> prod_local_type_id == NIL?
./src/pass4/findsig.c:				   mknode(FUNCSIGNATURE, NIL,
./src/pass4/findsig.c:                        addright(par, t = mknode(PARAMETER, NIL, self));
./src/pass4/findsig.c:			  r -> id_last_definition = NIL;
./src/pass4/findsig.c:				   NIL /* SHOULD BE INLINE CODE */,
./src/pass4/findsig.c:			  if(substerr != NIL) {
./src/pass4/findsig.c:			if (s -> par_id == NIL) {
./src/pass4/findsig.c:				      NIL, NIL, NIL));
./src/pass4/findsig.c:                    NODE * local_id = p -> prod_local_type_id == NIL?
./src/pass4/findsig.c:                        addright(par, t = mknode(PARAMETER, NIL, self));
./src/pass4/findsig.c:				     NIL /* SHOULD BE INLINE CODE */,
./src/pass4/findsig.c:				     NIL /* SHOULD BE INLINE CODE */,
./src/pass4/findsig.c:				     NIL,
./src/pass4/findsig.c:						    NIL,
./src/pass4/findsig.c:		    initsig(p, mknode(TYPESIGNATURE, NIL,
./src/pass4/findsig.c:				      NIL, NIL, NIL));
./src/pass4/findsig.c:		    NODE * self_param = mknode(PARAMETER, NIL, self);
./src/pass4/findsig.c:		    NODE * Int_param = mknode(PARAMETER, NIL, val_Integer);
./src/pass4/findsig.c:					  NIL, self_plist, self));
./src/pass4/findsig.c:					  NIL, self_plist, self));
./src/pass4/findsig.c:					  NIL, self_plist, val_Integer));
./src/pass4/findsig.c:					  NIL, Int_plist, self));
./src/pass4/findsig.c:					  NIL, emptylist(), val_Integer));
./src/pass4/findsig.c:		    initsig(p, mknode(TYPESIGNATURE, NIL,
./src/pass4/findsig.c:                                      NIL, NIL, NIL));
./src/pass4/findsig.c:		      if (sig -> ts_local_type_id != NIL) {
./src/pass4/findsig.c:                        if (on_dontsubst(p -> ext_denotation) != NIL) {
./src/pass4/findsig.c:                      par_list = mklist(mknode(PARAMETER, NIL, orig_sig), -1);
./src/pass4/findsig.c:                                      NIL,
./src/pass4/findsig.c:                      par_list = mklist(mknode(PARAMETER, NIL, new_sig), -1);
./src/pass4/findsig.c:                                       NIL,
./src/pass4/findsig.c:                      if (getcomp(sig, id_In, NIL, In_sig, sig, NIL, TRUE)
./src/pass4/findsig.c:                          != NIL) {
./src/pass4/findsig.c:                      if (getcomp(sig, id_Out, NIL, Out_sig, sig, NIL, TRUE)
./src/pass4/findsig.c:                          != NIL) {
./src/pass4/findsig.c:                      inscomp(sig, id_In, In_sig, NIL);
./src/pass4/findsig.c:                      inscomp(sig, id_Out, Out_sig, NIL);
./src/pass4/findsig.c:		    NODE * self_param = mknode(PARAMETER, NIL, self);
./src/pass4/findsig.c:			if (on_dontsubst(s -> re_denotation) != NIL) {
./src/pass4/findsig.c:				    id_ValueOf, NIL, sig_ValueOf, re_den_sig,
./src/pass4/findsig.c:				    NIL, TRUE) == NIL) {
./src/pass4/findsig.c:				    id_New, NIL, sig_New, re_den_sig,
./src/pass4/findsig.c:				    NIL, TRUE) == NIL) {
./src/pass4/findsig.c:				    id_assign, NIL, sig_assign, re_den_sig,
./src/pass4/findsig.c:				    NIL, TRUE) == NIL) {
./src/pass4/findsig.c:                        r = mknode(PARAMETER, NIL, r);
./src/pass4/findsig.c:                      r = mknode(FUNCSIGNATURE, NIL,
./src/pass4/findsig.c:                                    NIL,  /* in-line code */
./src/pass4/findsig.c:                                          NIL,
./src/pass4/findsig.c:                                    NIL,
./src/pass4/findsig.c:                    initsig(p, mknode(TYPESIGNATURE, NIL,
./src/pass4/findsig.c:                                      NIL, NIL, NIL));
./src/pass4/findsig.c:	    may_fail = (may_fail || p -> decl_signature != NIL);
./src/pass4/findsig.c:	      if (p -> decl_signature != NIL) {
./src/pass4/findsig.c:	    chgsig(p, NIL);
./src/pass4/findsig.c:	while (dontsubst != NIL) {
Binary file ./src/pass4/findmpsig.o matches
Binary file ./src/pass4/findsig.o matches
./src/pass4/findidsig.c:          if (failed_asig != NIL) {
./src/pass4/findidsig.c:          failed_asig = NIL;
./src/pass4/findidsig.c:        if (p -> id_appl != NIL) {
./src/pass4/findidsig.c:        if (failed_asig != NIL) {
./src/pass4/findidsig.c:            if (failed_comp != NIL) {
./src/pass4/findidsig.c:        if (p -> signature != NIL) {
./src/pass4/findidsig.c:    if (p -> sel_type != NIL) {
./src/pass4/findidsig.c:                    if (curr_type -> sel_type != NIL) {
./src/pass4/findidsig.c:                        if (curr_decl -> decl_signature != NIL) {
./src/pass4/findidsig.c:                                    substerr = NIL;
./src/pass4/findidsig.c:                                    if (substerr != NIL) {
./src/pass4/findidsig.c:                                    if (!def_match(subst_sig, NIL, p -> id_appl, p, FALSE)) {
./src/pass4/findidsig.c:                         p -> signature, NIL,
./src/pass4/findidsig.c:                         p -> id_appl, TRUE)) == NIL
./src/pass4/findidsig.c:                         p -> signature, NIL,
./src/pass4/findidsig.c:                         p -> id_appl, FALSE)) == NIL ) {
./src/pass4/findidsig.c:            if (p -> id_appl != NIL) {
./src/pass4/findidsig.c:            if (p -> signature != NIL) {
./src/pass4/findidsig.c:                             NIL, NIL,
./src/pass4/findidsig.c:                             NIL, TRUE)) != NIL
./src/pass4/findidsig.c:		  && p -> id_appl != NIL
./src/pass4/findidsig.c:		    if (diff_p != NIL) {
./src/pass4/finddecl.c: *  Find the appropriate declaration for id.  If id_appl is non-NIL
./src/pass4/finddecl.c: * argument list.  If signature is non-NIL use the fact that an explicit
./src/pass4/finddecl.c:    if (id -> id_appl == NIL) {
./src/pass4/finddecl.c:    if (id -> sel_type == NIL) {
./src/pass4/finddecl.c:	while( curr_defn != NIL ) {
./src/pass4/finddecl.c:                if (may_fail || prev_def(curr_defn) != NIL) {
./src/pass4/finddecl.c:		      && (prev_defn = prev_def(curr_defn)) != NIL
./src/pass4/finddecl.c:	if (appl != NIL) {
./src/pass4/finddecl.c:		    if (arg_sig == NIL) {
./src/pass4/finddecl.c:                     && arg_type -> mp_type_modifier == NIL) {
./src/pass4/finddecl.c:			      NIL, NIL) == 0)) {
./src/pass4/finddecl.c:		    if(arg_type -> signature == NIL) {
./src/pass4/finddecl.c:				id -> signature, NIL,
./src/pass4/finddecl.c:			q = NIL;
./src/pass4/finddecl.c:		if (q != NIL) {
./src/pass4/finddecl.c:            while(usl != NIL) {
./src/pass4/finddecl.c:			if (p -> signature == NIL) {
./src/pass4/finddecl.c:				    id -> signature, NIL,
./src/pass4/finddecl.c:                        q = NIL;
./src/pass4/finddecl.c:		    if (q != NIL) {
./src/pass4/finddecl.c: * Leaves (or sets) selection type to NIL if nothing appropriate is found.
./src/pass4/finddecl.c:    if (string -> sel_type == NIL) {
./src/pass4/finddecl.c:            while(usl != NIL && !found_it) {
./src/pass4/finddecl.c:			if (p -> signature == NIL) {
./src/pass4/finddecl.c:	    chgfld(&(string -> sel_type), NIL);
./src/pass4/finddecl.c:    if (appl != NIL) {
./src/pass4/finddecl.c:	args = NIL;
./src/pass4/finddecl.c:	void_decl = NIL;
./src/pass4/finddecl.c:    if (sig2 != NIL && sig2 != ERR_SIG && comp_st(sig, sig2, NIL, NIL) != 0) {
./src/pass4/finddecl.c:    if (args == NIL)
./src/pass4/finddecl.c:	num_args < num_params && new_args == NIL) {
./src/pass4/finddecl.c:	    if (s_par_sig != NIL && s_par_sig != ERR_SIG) {
./src/pass4/finddecl.c:			    s_par_sig, NIL, NIL) != 0) {
./src/pass4/finddecl.c:			    s_par_sig -> val_denotation, NIL, NIL) != 0) {
./src/pass4/finddecl.c:			    s_par_sig -> val_denotation, NIL, NIL) != 0) {
./src/pass4/fixhints.c: *   A NIL value for sig2 is treated as an unknown signature.
./src/pass4/fixhints.c:    if (sig == ERR_SIG || sig == NIL || sig2 == ERR_SIG ) {
./src/pass4/fixhints.c:	    if (sig -> dcs_exceptions != NIL) {
./src/pass4/fixhints.c:		chgfld(&(p -> dcs_exceptions), NIL);
./src/pass4/fixhints.c:	    if (sig2 == NIL) {
./src/pass4/fixhints.c:		ncopy -> ts_const_code = NIL;
./src/pass4/fixhints.c:		ncopy -> ts_string_code = NIL;
./src/pass4/fixhints.c:		ncopy -> ts_element_code = NIL;
./src/pass4/fixhints.c:	    make_consistent(ts_const_code, NIL);
./src/pass4/fixhints.c:	    make_consistent(ts_string_code, NIL);
./src/pass4/fixhints.c:	    make_consistent(ts_element_code, NIL);
./src/pass4/fixhints.c:	    if (sig2 == NIL) {
./src/pass4/fixhints.c:		ncopy -> fsig_inline_code = NIL;
./src/pass4/fixhints.c:		ncopy -> fsig_inline_code = NIL;
./src/pass4/fixhints.c:		ncopy -> fsig_construction = NIL;
./src/pass4/fixhints.c:	    if (e -> id_def_found && e -> sel_type == NIL &&
./src/pass4/fixhints.c:		|| e -> ap_operator -> sel_type == NIL) {
./src/pass4/fixhints.c:    e_V_sig = getcomp(e_sig, id_ValueOf, NIL,
./src/pass4/fixhints.c:		      NIL, NIL, NIL, FALSE);
./src/pass4/fixhints.c:    e_New_sig = getcomp(e_sig, id_New, NIL,
./src/pass4/fixhints.c:			NIL, NIL, NIL, FALSE);
./src/pass4/fixhints.c:    if (e_V_sig == NIL || e_New_sig == NIL) {
./src/pass4/fixhints.c:    if (sig == ERR_SIG || sig == NIL) {
./src/pass4/fixhints.c:	    if (p -> id_last_definition == NIL) {
./src/pass4/fixhints.c:    if (sig == ERR_SIG || sig == NIL) {
./src/pass4/fixhints.c:	      if (p -> id_last_definition == NIL) {
./src/pass4/fixhints.c:		    if (s -> dcs_exceptions != NIL) {
./src/pass4/fixhints.c:			chgfld(&(new_comp -> dcs_exceptions), NIL);
./src/pass4/fixhints.c:		|| sig -> fsig_construction != NIL) {
./src/pass4/fixhints.c:		q -> fsig_construction = NIL;
./src/pass4/findmpsig.c:        if (tm == NIL) {
./src/pass4/findmpsig.c:            dbgmsg("findsig: NIL type modifier\n");
./src/pass4/findmpsig.c:                           NIL,
./src/pass4/findmpsig.c:                           NIL,
./src/pass4/findmpsig.c:                           TRUE) != NIL) {
./src/pass4/findmpsig.c:            sig -> ts_string_code = NIL;
./src/pass4/findmpsig.c:            sig -> ts_element_code = NIL;
./src/pass4/findmpsig.c:                if (s -> ee_export_list != NIL) {
./src/pass4/findmpsig.c:			   (s -> ee_signature == NIL /* only an optimization */
./src/pass4/findmpsig.c:			    || tm -> el_local_type_id != NIL
./src/pass4/findmpsig.c:			    ? NIL : p -> mp_primary),
./src/pass4/findmpsig.c:			   tm -> el_local_type_id == NIL? NIL : p,
./src/pass4/findmpsig.c:                           NIL,
./src/pass4/findmpsig.c:                           TRUE) != NIL) {
./src/pass4/findmpsig.c:                  if (s -> ee_signature == NIL &&
./src/pass4/findmpsig.c:            sig -> ts_string_code = NIL;
./src/pass4/findmpsig.c:            sig -> ts_element_code = NIL;
./src/pass4/findmpsig.c:        if (sig -> ts_local_type_id == NIL) {
./src/pass4/fixhints.c~: *   A NIL value for sig2 is treated as an unknown signature.
./src/pass4/fixhints.c~:    if (sig == ERR_SIG || sig == NIL || sig2 == ERR_SIG ) {
./src/pass4/fixhints.c~:	    if (sig -> dcs_exceptions != NIL) {
./src/pass4/fixhints.c~:		chgfld(&(p -> dcs_exceptions), NIL);
./src/pass4/fixhints.c~:	    if (sig2 == NIL) {
./src/pass4/fixhints.c~:		ncopy -> ts_const_code = NIL;
./src/pass4/fixhints.c~:		ncopy -> ts_string_code = NIL;
./src/pass4/fixhints.c~:		ncopy -> ts_element_code = NIL;
./src/pass4/fixhints.c~:	    make_consistent(ts_const_code, NIL);
./src/pass4/fixhints.c~:	    make_consistent(ts_string_code, NIL);
./src/pass4/fixhints.c~:	    make_consistent(ts_element_code, NIL);
./src/pass4/fixhints.c~:	    if (sig2 == NIL) {
./src/pass4/fixhints.c~:		ncopy -> fsig_inline_code = NIL;
./src/pass4/fixhints.c~:		ncopy -> fsig_inline_code = NIL;
./src/pass4/fixhints.c~:		ncopy -> fsig_construction = NIL;
./src/pass4/fixhints.c~:	    if (e -> id_def_found && e -> sel_type == NIL &&
./src/pass4/fixhints.c~:		|| e -> ap_operator -> sel_type == NIL) {
./src/pass4/fixhints.c~:    e_V_sig = getcomp(e_sig, id_ValueOf, NIL,
./src/pass4/fixhints.c~:		      NIL, NIL, NIL, FALSE);
./src/pass4/fixhints.c~:    e_New_sig = getcomp(e_sig, id_New, NIL,
./src/pass4/fixhints.c~:			NIL, NIL, NIL, FALSE);
./src/pass4/fixhints.c~:    if (e_V_sig == NIL || e_New_sig == NIL) {
./src/pass4/fixhints.c~:    if (sig == ERR_SIG || sig == NIL) {
./src/pass4/fixhints.c~:	    if (p -> id_last_definition == NIL) {
./src/pass4/fixhints.c~:    if (sig == ERR_SIG || sig == NIL) {
./src/pass4/fixhints.c~:	      if (p -> id_last_definition == NIL) {
./src/pass4/fixhints.c~:		    if (s -> dcs_exceptions != NIL) {
./src/pass4/fixhints.c~:			chgfld(&(new_comp -> dcs_exceptions), NIL);
./src/pass4/fixhints.c~:		|| sig -> fsig_construction != NIL) {
./src/pass4/fixhints.c~:		q -> fsig_construction = NIL;
./src/pass4/checksigs.c:NODE * curr_tsig = NIL;  /* signature of anonymous local type ids */
./src/pass4/checksigs.c:NODE * err_node = NIL;  /* node to be used for error message in lieu */
./src/pass4/checksigs.c:	    if (p -> sel_type != NIL) {
./src/pass4/checksigs.c:	    if (p -> sel_type != NIL && in_sig
./src/pass4/checksigs.c:		  if (sig -> ts_string_code == NIL
./src/pass4/checksigs.c:		      || sig -> ts_element_code == NIL
./src/pass4/checksigs.c:		      || p -> sel_type -> sel_type != NIL) {
./src/pass4/checksigs.c:                               NIL, NIL) == 0);
./src/pass4/checksigs.c:		    psig = NIL;
./src/pass4/checksigs.c:		if (comp_st(psig, var_Void, NIL, NIL) != 0) {
./src/pass4/checksigs.c:                    if (op -> signature -> fsig_inline_code == NIL
./src/pass4/checksigs.c:                        && op -> signature -> fsig_construction != NIL) {
./src/pass4/checksigs.c:		    err_node = NIL;
./src/pass4/checksigs.c:				    err_node = NIL;
./src/pass4/checksigs.c:				if (failed_comp != NIL) {
./src/pass4/checksigs.c:			    val_Boolean, NIL,NIL) != 0)  { 
./src/pass4/checksigs.c:				       p -> signature, NIL, NIL) != 0) {
./src/pass4/checksigs.c:		if (q -> decl_signature != NIL &&
./src/pass4/checksigs.c:                            q -> decl_denotation -> signature, NIL, NIL) != 0) {
./src/pass4/checksigs.c:		if (q -> decl_signature == NIL) {
./src/pass4/checksigs.c:		err_node = NIL;
./src/pass4/checksigs.c:	    if (p -> mp_type_modifier != NIL
./src/pass4/checksigs.c:		    if (q -> decl_signature != NIL &&
./src/pass4/checksigs.c:                                NIL, NIL) != 0) {
./src/pass4/checksigs.c:		    err_node = NIL;
./src/pass4/checksigs.c:		    err_node = NIL;
./src/pass4/checksigs.c:		if (p -> signature == NIL) {
./src/pass4/checksigs.c:	    if (p -> signature == NIL) {
./src/pass4/checksigs.c:	    if (p -> signature == NIL) {
./src/pass4/checksigs.c:	    if (p -> signature == NIL) {
./src/pass4/checksigs.c:	    if (p -> signature == NIL) {
./src/pass4/checksigs.c:    import(p, NIL);
./src/pass4/match.c: * NIL indicates no forgetting is necessary.  If the argument signature
./src/pass4/match.c:    if (match_delv == NIL) { \
./src/pass4/match.c:    if (failed_asig != NIL) {
./src/pass4/match.c:    if (failed_psig != NIL) {
./src/pass4/match.c:    if (failed_comp != NIL) {
./src/pass4/match.c:    match_delv = NIL;
./src/pass4/match.c:    failed_comp = failed_asig = failed_psig = NIL;
./src/pass4/match.c:	if (comp_st(asig, psig, NIL, NIL) != 0) {
./src/pass4/match.c:	    if (acomps == NIL) {
./src/pass4/match.c:		dbgmsg("amatch: NIL type sig\n");
./src/pass4/match.c:	while (acomps != NIL) {
./src/pass4/match.c:		    if (pcomps != NIL) {
./src/pass4/match.c:		    if ( pcomps == NIL ||
./src/pass4/match.c:			if (pcomps != NIL)
./src/pass4/match.c:			if (pcomps != NIL) 
./src/pass4/match.c:	if (pcomps != NIL) {
./src/main.rb:# define NIL ((NODE *)0)
./src/main.tmp.rb~:# define NIL ((NODE *)0)
./src/parm.tmp.rb:#       if (err_node != NIL) { \
./src/parm.tmp.rb:#       if (err_node != NIL) { \
./src/main.tmp.save2.rb:# define NIL ((NODE *)0)
./src/fixed_bugs:	if (e_V_sig == NIL) {
./src/fixed_bugs:	if (e_New_sig == NIL) {
./src/fixed_bugs:    if (e_V_sig == NIL || e_New_sig == NIL) { 
./src/fixed_bugs:		if ( p -> id_last_definition == NIL
./src/fixed_bugs:				sig_Signature, NIL, NIL) != 0) {
./src/fixed_bugs:	    if (e -> id_def_found && e -> sel_type == NIL &&
./src/pass2/restore.c:    if (idnode == NIL) return;
./src/pass2/process_id.c: *  If the last_definition field of the id node is not NIL,
./src/pass2/process_id.c:    if (idnode->id_use_list == NIL)
./src/pass2/process_id.c:    } else if (idnode->id_last_definition == NIL) {
./src/pass2/symtabtest.c:							mknode(LETTERID, stt_enter("first", 6), NIL),
./src/pass2/symtabtest.c:							NIL,
./src/pass2/symtabtest.c:							NIL),
./src/pass2/symtabtest.c:							mknode(LETTERID, stt_enter("second", 7), NIL),
./src/pass2/symtabtest.c:							NIL,
./src/pass2/symtabtest.c:							NIL),
./src/pass2/symtabtest.c:							mknode(LETTERID, stt_enter("second", 7), NIL),
./src/pass2/symtabtest.c:							NIL,
./src/pass2/symtabtest.c:							NIL)),
./src/pass2/build_symtab.c:NODE * usl_ptr = NIL;
./src/pass2/build_symtab.c:    if (x == NIL)
./src/pass2/build_symtab.c:            /* Process program body. Leave decl_block pointing to NIL. */
./src/pass2/build_symtab.c:                                    /* v -> tsc_id -> id_last_definition = NIL; */
./src/pass2/build_symtab.c:                          v -> decl_id -> id_last_definition = NIL;
./src/pass2/build_symtab.c:		  if(!is_ptr(x -> signature) || x -> signature == NIL) {
./src/pass2/add_id.c: *  Nothing is done if idnode is NIL, e.g. in the case of anonymous 
./src/pass2/add_id.c:                if (idnode != NIL) idnode -> id_last_definition = defnode;
./src/pass2/add_id.c:    if (idnode == NIL) return;
./src/pass2/Idtable.h: *	The initial i_value for an entry is NIL.
./src/pass2/README:       of that name (e.g. Boolean), id nodes with non-NIL last definition
./src/pass2/README:       enclosing use list (NIL if there is none).
./src/pass2/add_id.c~: *  Nothing is done if idnode is NIL, e.g. in the case of anonymous 
./src/pass2/add_id.c~:                if (idnode != NIL) idnode -> id_last_definition = defnode;
./src/pass2/add_id.c~:    if (idnode == NIL) return;
./src/main.tmp.rb:# define NIL ((NODE *)0)
./src/sigio/sig_in.c:    while (p != NIL ) {
./src/sigio/sig_in.c:    while (p != NIL ) {
./src/sigio/sig_in.c: * A NIL pointer is represented as a string consisting of a single FF
./src/sigio/sig_in.c:        return(NIL);
./src/sigio/sig_in.c:    NODE * selt = NIL;
./src/sigio/sig_in.c:    NODE * last_def = NIL;
./src/sigio/sig_in.c:	if (last_def != NIL &&
./src/sigio/sig_in.c:  decl_nums = NIL;
./src/sigio/sig_in.c:      result = mknode (REXTERNDEF, NIL, NIL);
./src/sigio/sig_in.c:                return(NIL);
./src/sigio/sig_in.c:                        v = mknode(DECLARATION, NIL, NIL, NIL);
./src/sigio/sig_in.c:                    NODE * result = mknode(MODPRIMARY, NIL, NIL);
./src/sigio/sig_in.c:                    NODE * result = mknode(kindno, NIL, NIL);
./src/sigio/sig_in.c:				    NIL, NIL);
./src/sigio/sig_in.c:                            v = mknode(PARAMETER, NIL, NIL);
./src/sigio/sig_in.c:					    mknode(EXTERNDEF,NIL));
./src/sigio/sig_in.c:                result = mknode(TYPESIGNATURE, NIL, NIL, NIL, NIL, NIL);
./src/sigio/sig_in.c:                return(NIL);
./src/sigio/sa_sig_in.c:    while (p != NIL ) {
./src/sigio/sa_sig_in.c:    while (p != NIL ) {
./src/sigio/sa_sig_in.c: * A NIL pointer is represented as a string consisting of a single FF
./src/sigio/sa_sig_in.c:        return(NIL);
./src/sigio/sa_sig_in.c:    NODE * selt = NIL;
./src/sigio/sa_sig_in.c:    NODE * last_def = NIL;
./src/sigio/sa_sig_in.c:	    last_def = NIL;
./src/sigio/sa_sig_in.c:	if (last_def != NIL &&
./src/sigio/sa_sig_in.c:  decl_nums = NIL;
./src/sigio/sa_sig_in.c:                return(NIL);
./src/sigio/sa_sig_in.c:                        v = mknode(DECLARATION, NIL, NIL, NIL);
./src/sigio/sa_sig_in.c:                    NODE * result = mknode(MODPRIMARY, NIL, NIL);
./src/sigio/sa_sig_in.c:                    NODE * result = mknode(kindno, NIL, NIL);
./src/sigio/sa_sig_in.c:				    NIL, NIL);
./src/sigio/sa_sig_in.c:                            v = mknode(PARAMETER, NIL, NIL);
./src/sigio/sa_sig_in.c:					    mknode(EXTERNDEF,NIL));
./src/sigio/sa_sig_in.c:                result = mknode(TYPESIGNATURE, NIL, NIL, NIL, NIL, NIL);
./src/sigio/sa_sig_in.c:                return(NIL);
./src/sigio/sig_out.c:    while (p != NIL ) {
./src/sigio/sig_out.c: * A NIL pointer is represented as a string consisting of a single FF
./src/sigio/sig_out.c:    if (s == NIL) {
./src/sigio/sig_out.c:    if (p -> sel_type != NIL) {
./src/sigio/sig_out.c:        if (p -> id_last_definition != NIL
./src/sigio/sig_out.c:    decl_nums = NIL;
./src/sigio/sig_out.c:    if (p == NIL) {
./src/sigio/sig_out.c:		if (p -> sel_type == NIL
./src/sigio/sig_out.c:		    && p -> id_last_definition != NIL
./src/sigio/sig_out.c:                if (p -> mp_type_modifier == NIL) {
./src/sigio/sig_out.c:                if (p -> str_expansion == NIL) {
./src/sigio/sig_out.c:                    if (p -> fsig_inline_code == NIL
./src/sigio/sig_out.c:                        && p -> fsig_construction != NIL) {
./src/sigio/sig_out.c:				   (s -> par_id == NIL? "(anon)" :
./src/sigio/sig_out.c:                    if (p -> fsig_construction == NIL) {
./src/RICfilter/filter.c:		RICp next_i = p -> next_instr; /* Cant be NIL */
./src/RICfilter/filter.c~:		RICp next_i = p -> next_instr; /* Cant be NIL */
Binary file ./src/RICfilter/filter matches
./src/djd~:./pass5d/appl.c:	  if (op -> kind != LETTERID || op -> sel_type == NIL) {
./src/djd~:./pass5d/appl.c~:	  if (op -> kind != LETTERID || op -> sel_type == NIL) {
./src/djd~:./pass2/symtabtest.c:							mknode(LETTERID, stt_enter("first", 6), NIL),
./src/djd~:./pass2/symtabtest.c:							mknode(LETTERID, stt_enter("second", 7), NIL),
./src/djd~:./pass2/symtabtest.c:							mknode(LETTERID, stt_enter("second", 7), NIL),
./src/djd~:./pass5c/appl.c:		  if (op_kind != LETTERID || op -> sel_type == NIL) {
./src/djd~:./pass5c/find_inline.c:	for (p = body; p != NIL && p -> kind != LETTERID;
./src/vr.c:# define NIL 0
./src/vr.c:static vrline * vrptr = NIL; /* set by findvl to point to the last record */
./src/vr.c:    q = NIL;
./src/vr.c:    while ( p != NIL && ((p -> vr_vline) <= vln) ) {
./src/vr.c:        if ( q == NIL ) {
./src/vr.c:        if ( vrptr == NIL ) {
./src/vr.c:        if ( vrptr == NIL ) {
./src/lh_opt/flocs.r:		       (category = ALCNIL)      ==>
./src/lh_opt/summary.r:				if c = ALCNIL ==> "unknown"
./src/lh_opt/loclist.r:   in effect, (making ANY and ALCNIL identical). Both represent non-heap
./src/lh_opt/loclist.r:   Perhaps MEM_OBJ and NONE_OBJ should be amalgamated (and ANY and ALCNIL)
./src/lh_opt/dlist.r:# define NIL from_nil[0]
./src/lh_opt/dlist.r:# define NEWNIL D$Out[D$create[from_nil[0]]]
./src/lh_opt/dlist.r:	    '' == func[] val D { D$create[NIL] };
./src/lh_opt/dlist.r:			    NIL
./src/lh_opt/dlist.r:			    NIL
./src/lh_opt/dlist.r:		    d^ := from_e[Elt$Mk[x,NEWNIL,NEWNIL]];
./src/lh_opt/dlist.r:				from_e[Elt$Mk[x,NEWNIL,nlst]]
./src/lh_opt/dlist.r:		    d^ := from_e[Elt$Mk[x,NEWNIL,NEWNIL]];
./src/lh_opt/dlist.r:				from_e[Elt$Mk[x,nnxt,NEWNIL]]
./src/lh_opt/dlist.r:				last[to_e[nx^]]^ := NIL;
./src/lh_opt/dlist.r:				next[to_e[ls^]]^ := NIL;
./src/lh_opt/graph.r:			code == if n = NONENODE   ==> ALCNIL
./src/lh_opt/graph.r:				#  n = TOP         ==> ALCNIL
./src/lh_opt/rc.r:				(category = ALCNIL) cor (category = ALCSTAT)
./src/lh_opt/locs.r:(* NB ALCNIL and ANY are effectively equivalent since MEM_OBJ and NONE_OBJ are
./src/lh_opt/locs.r:		       (category = ALCNIL) ==>
./src/lh_opt/locs.r:			perhaps better, ALCNIL *)
./src/lh_opt/classify.i:		UNSAFE		UNSAFE		ALCNIL
./src/lh_opt/classify.i:NSC		ALCNIL		ALCNIL		ALCNIL
./src/lh_opt/classify.i:NSC & def fn	MAYBEALC	ALCNIL		MAYBEALC
./src/lh_opt/classify.i:		(* may change to ALLOC  or ALCNIL or MAYBEALC *)
./src/lh_opt/classify.i:	 # (op = CLC)    ==> cat := if ONLYINTRA then ALCNIL
./src/lh_opt/classify.i:				    else ALCNIL
./src/lh_opt/classify.i:		   CLIs into ALCNILs - not interproc.ing them *)
./src/lh_opt/classify.i:				cat := ALCNIL;
./src/lh_opt/classify.i:					    if ONLYINTRA then ALCNIL
./src/lh_opt/classify.i:					    else ALCNIL (* may change if fn
./src/lh_opt/classify.i:			    cat := ALCNIL;
./src/lh_opt/classify.i:			cat := ALCNIL;
./src/lh_opt/classify.i:			cat := ALCNIL;
./src/lh_opt/classify.i:	if ((op = CLL) cor (op = CLC)) cand (cat = ALCNIL) then 
./src/lh_opt/defs.h:# define ALCNIL 2		/* (nil) DCL, LDN, LDS, LDL, UDC, ADP, TRU, 
./src/stree/mknode.c: * Other fields are initialized to NIL.
./src/stree/mknode.c:            *p = NIL;
./src/stree/mknode.c:            *p = NIL;
./src/stree/mknode.c:            *p = NIL;
./src/stree/mknode.c:    if ( p == NIL ) return;
./src/stree/mknode.c:                        for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/stree/mknode.c:    p = q = NIL;
./src/stree/mknode.c:                    p = q = cn_cons(lock(v),NIL);
./src/stree/mknode.c:                    cn_settail(q, cn_cons(lock(v), NIL));
./src/stree/mknode.c:    if (l != NIL) {
./src/stree/listops.rb~: * if e is NIL do nothing
./src/stree/listops.rb~:    if (e == NIL) return(l);
./src/stree/listops.rb~:        p = cn_cons(lock(e),NIL);
./src/stree/listops.rb~: * If e is NIL do nothing.
./src/stree/listops.rb~:    if ( e == NIL ) return(l);
./src/stree/listops.rb~:    p = cn_cons(lock(e), NIL);
./src/stree/listops.rb~: * If ei is NIL, it is ignored.
./src/stree/listops.rb~:# * If e is NIL do nothing.
./src/stree/listops.rb~:    if ( e == NIL ) then
./src/stree/listops.rb~:    p = cn_cons(lock(e), NIL)
./src/stree/listops.rb~:        (l2 -> lh_last) = (l2 -> lh_first) = NIL;
./src/stree/stplinks.mh:/* parameter.  NIL indicates no call */
./src/stree/stplinks.mh:   +(1<<22)  /* NIL if this represents a coercion */
./src/stree/mknode.tmp.rb~:# #  * Other fields are initialized to NIL.
./src/stree/mknode.tmp.rb~:#         *p = NIL;
./src/stree/mknode.tmp.rb~:# #             *p = NIL;
./src/stree/mknode.tmp.rb~:# #     if ( p == NIL ) return;
./src/stree/mknode.tmp.rb~:# #                         for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/stree/mknode.tmp.rb~:# #     p = q = NIL;
./src/stree/mknode.tmp.rb~:# #                     p = q = cn_cons(lock(v),NIL);
./src/stree/mknode.tmp.rb~:# #                     cn_settail(q, cn_cons(lock(v), NIL));
./src/stree/mknode.tmp.rb~:# #     if (l != NIL) {
./src/stree/stmkfields.mh.rb:# # parameter.  NIL indicates no call */
./src/stree/stmkfields.mh.rb:    +(1<<22)  # NIL if this represents a coercion */
./src/stree/stmkfields.mod.h~:/* parameter.  NIL indicates no call */
./src/stree/stmkfields.mod.h~:   +(1<<22)  /* NIL if this represents a coercion */
./src/stree/listops.tmp.rb:#  * if e is NIL do nothing
./src/stree/listops.tmp.rb:#     if (e == NIL) return(l);
./src/stree/listops.tmp.rb:#         p = cn_cons(lock(e),NIL);
./src/stree/listops.tmp.rb:#  * If e is NIL do nothing.
./src/stree/listops.tmp.rb:#     if ( e == NIL ) return(l);
./src/stree/listops.tmp.rb:#     p = cn_cons(lock(e), NIL);
./src/stree/listops.tmp.rb:#  * If ei is NIL, it is ignored.
./src/stree/listops.tmp.rb:# * If e is NIL do nothing.
./src/stree/listops.tmp.rb:    if ( e == NIL ) then
./src/stree/listops.tmp.rb:    p = cn_cons(lock(e), NIL)
./src/stree/listops.tmp.rb:#         (l2 -> lh_last) = (l2 -> lh_first) = NIL;
Binary file ./src/stree/prstree.o matches
./src/stree/listops.rb: * if e is NIL do nothing
./src/stree/listops.rb:    if (e == NIL) return(l);
./src/stree/listops.rb:        p = cn_cons(lock(e),NIL);
./src/stree/listops.rb: * If e is NIL do nothing.
./src/stree/listops.rb:    if ( e == NIL ) return(l);
./src/stree/listops.rb:    p = cn_cons(lock(e), NIL);
./src/stree/listops.rb: * If ei is NIL, it is ignored.
./src/stree/listops.rb:# * If e is NIL do nothing.
./src/stree/listops.rb:    if ( e == NIL ) then
./src/stree/listops.rb:    p = cn_cons(lock(e), NIL)
./src/stree/listops.rb:        (l2 -> lh_last) = (l2 -> lh_first) = NIL;
./src/stree/mknode.rb:#  * Other fields are initialized to NIL.
./src/stree/mknode.rb:        *p = NIL;
./src/stree/mknode.rb:#             *p = NIL;
./src/stree/mknode.rb:#     if ( p == NIL ) return;
./src/stree/mknode.rb:#                         for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/stree/mknode.rb:#     p = q = NIL;
./src/stree/mknode.rb:#                     p = q = cn_cons(lock(v),NIL);
./src/stree/mknode.rb:#                     cn_settail(q, cn_cons(lock(v), NIL));
./src/stree/mknode.rb:#     if (l != NIL) {
./src/stree/stmkfields.mh.rb~:# # parameter.  NIL indicates no call */
./src/stree/stmkfields.mh.rb~:    +(1<<22)  # NIL if this represents a coercion */
./src/stree/listops.c~: * if e is NIL do nothing
./src/stree/listops.c~:    if (e == NIL) return(l);
./src/stree/listops.c~:        p = cn_cons(lock(e),NIL);
./src/stree/listops.c~: * If e is NIL do nothing.
./src/stree/listops.c~:    if ( e == NIL ) return(l);
./src/stree/listops.c~:    p = cn_cons(lock(e), NIL);
./src/stree/listops.c~: * If ei is NIL, it is ignored.
./src/stree/listops.c~:        (l2 -> lh_last) = (l2 -> lh_first) = NIL;
./src/stree/#ststructs.mh.rb#:# NIL = 0
./src/stree/#ststructs.mh.rb#:  return(mknode(LISTHEADER,NIL,NIL))
./src/stree/#ststructs.mh.rb#:  if ((l) != NIL && l[0].kind == LISTHEADER)
./src/stree/#ststructs.mh.rb#:#define NIL 0
./src/stree/#ststructs.mh.rb#:/* parameter.  NIL indicates no call */
./src/stree/#ststructs.mh.rb#:#   define mp_type_modifier MPrimary . MPrimary_mp_type_modifier  /* NIL if this represents a coercion */
./src/stree/#ststructs.mh.rb#:#define is_good(l) ((l) == NIL || \
./src/stree/#ststructs.mh.rb#:#define is_list(l) ((l) != NIL && \
./src/stree/#ststructs.mh.rb#:#define is_empty(l) ((l)->lh_first == NIL)
./src/stree/#ststructs.mh.rb#:#define emptylist() mknode(LISTHEADER,NIL,NIL)
./src/stree/#ststructs.mh.rb#:    v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/#ststructs.mh.rb#:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/#ststructs.mh.rb#:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/#ststructs.mh.rb#:#define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/#ststructs.mh.rb#:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/#ststructs.mh.rb#:if (mL__0OP == NIL) { \
./src/stree/#ststructs.mh.rb#:if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/#ststructs.mh.rb#:    if (mL__0O == NIL) { \
./src/stree/#ststructs.mh.rb#:	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/#ststructs.mh.rb#:    if (mL__0OP == NIL) { \
./src/stree/#ststructs.mh.rb#:    if (mL__0OP == NIL) { \
./src/stree/#ststructs.mh.rb#:/* with a NIL loop variable  */
./src/stree/#ststructs.mh.rb#:    ConsNode * mL__0OP = NIL; \
./src/stree/#ststructs.mh.rb#:	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/#ststructs.mh.rb#:	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/#ststructs.mh.rb#:    } while (mL__0OP != NIL); \
./src/stree/#ststructs.mh.rb#:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/#ststructs.mh.rb#:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/stptrs.mh.rb~:# # parameter.  NIL indicates no call */
./src/stree/stptrs.mh.rb~:    +(1<<22)  # NIL if this represents a coercion */
./src/stree/stptrs.mh:/* parameter.  NIL indicates no call */
./src/stree/stptrs.mh:   +(1<<22)  /* NIL if this represents a coercion */
./src/stree/#stsizes.mh.rb#:#/* parameter.  NIL indicates no call */
./src/stree/#stsizes.mh.rb#:#     /* NIL if this represents a coercion */
./src/stree/ststructs.mh.rb:# NIL = 0
./src/stree/ststructs.mh.rb:  return(mknode(LISTHEADER,NIL,NIL))
./src/stree/ststructs.mh.rb:  if ((l) != NIL && l[0].kind == LISTHEADER)
./src/stree/ststructs.mh.rb:  if (l[0].lh_first == NIL) then
./src/stree/ststructs.mh.rb:#define NIL 0
./src/stree/ststructs.mh.rb:/* parameter.  NIL indicates no call */
./src/stree/ststructs.mh.rb:#   define mp_type_modifier MPrimary . MPrimary_mp_type_modifier  /* NIL if this represents a coercion */
./src/stree/ststructs.mh.rb:#define is_good(l) ((l) == NIL || \
./src/stree/ststructs.mh.rb:#define is_list(l) ((l) != NIL && \
./src/stree/ststructs.mh.rb:#define is_empty(l) ((l)->lh_first == NIL)
./src/stree/ststructs.mh.rb:#define emptylist() mknode(LISTHEADER,NIL,NIL)
./src/stree/ststructs.mh.rb:    v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/ststructs.mh.rb:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.rb:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.rb:#define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/ststructs.mh.rb:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.rb:if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.rb:if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/ststructs.mh.rb:    if (mL__0O == NIL) { \
./src/stree/ststructs.mh.rb:	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/ststructs.mh.rb:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.rb:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.rb:/* with a NIL loop variable  */
./src/stree/ststructs.mh.rb:    ConsNode * mL__0OP = NIL; \
./src/stree/ststructs.mh.rb:	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/ststructs.mh.rb:	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/ststructs.mh.rb:    } while (mL__0OP != NIL); \
./src/stree/ststructs.mh.rb:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/ststructs.mh.rb:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/#listops.rb#: * if e is NIL do nothing
./src/stree/#listops.rb#:    if (e == NIL) return(l);
./src/stree/#listops.rb#:        p = cn_cons(lock(e),NIL);
./src/stree/#listops.rb#: * If e is NIL do nothing.
./src/stree/#listops.rb#:    if ( e == NIL ) return(l);
./src/stree/#listops.rb#:    p = cn_cons(lock(e), NIL);
./src/stree/#listops.rb#: * If ei is NIL, it is ignored.
./src/stree/#listops.rb#:# * If e is NIL do nothing.
./src/stree/#listops.rb#:    if ( e == NIL ) return(l)
./src/stree/#listops.rb#:    p = cn_cons(lock(e), NIL)
./src/stree/#listops.rb#:        (l2 -> lh_last) = (l2 -> lh_first) = NIL;
Binary file ./src/stree/stree.o matches
./src/stree/stsizes.mh.rb~:#/* parameter.  NIL indicates no call */
./src/stree/stsizes.mh.rb~:#     /* NIL if this represents a coercion */
./src/stree/stmkfields.mh:/* parameter.  NIL indicates no call */
./src/stree/stmkfields.mh:   +(1<<22)  /* NIL if this represents a coercion */
./src/stree/listops.c: * if e is NIL do nothing
./src/stree/listops.c:    if (e == NIL) return(l);
./src/stree/listops.c:        p = cn_cons(lock(e),NIL);
./src/stree/listops.c: * If e is NIL do nothing.
./src/stree/listops.c:    if ( e == NIL ) return(l);
./src/stree/listops.c:    p = cn_cons(lock(e), NIL);
./src/stree/listops.c: * If ei is NIL, it is ignored.
./src/stree/listops.c:        (l2 -> lh_last) = (l2 -> lh_first) = NIL;
./src/stree/stsizes.mh.tmp.rb:#/* parameter.  NIL indicates no call */
./src/stree/stsizes.mh.tmp.rb:#     /* NIL if this represents a coercion */
./src/stree/unparse.c:    if (p == NIL) return;
./src/stree/unparse.c:                if (p -> bld_declaration_list == NIL
./src/stree/unparse.c:		    if (p -> bld_den_seq == NIL) {
./src/stree/unparse.c:                if (p -> mp_type_modifier != NIL) {
./src/stree/dststructs.mh.rb~:#define NIL 0
./src/stree/dststructs.mh.rb~:/* parameter.  NIL indicates no call */
./src/stree/dststructs.mh.rb~:#   define mp_type_modifier MPrimary . MPrimary_mp_type_modifier  /* NIL if this represents a coercion */
./src/stree/dststructs.mh.rb~:#define is_good(l) ((l) == NIL || \
./src/stree/dststructs.mh.rb~:#define is_list(l) ((l) != NIL && \
./src/stree/dststructs.mh.rb~:#define is_empty(l) ((l)->lh_first == NIL)
./src/stree/dststructs.mh.rb~:#define emptylist() mknode(LISTHEADER,NIL,NIL)
./src/stree/dststructs.mh.rb~:    v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/dststructs.mh.rb~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/dststructs.mh.rb~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/dststructs.mh.rb~:#define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/dststructs.mh.rb~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/dststructs.mh.rb~:if (mL__0OP == NIL) { \
./src/stree/dststructs.mh.rb~:if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/dststructs.mh.rb~:    if (mL__0O == NIL) { \
./src/stree/dststructs.mh.rb~:	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/dststructs.mh.rb~:    if (mL__0OP == NIL) { \
./src/stree/dststructs.mh.rb~:    if (mL__0OP == NIL) { \
./src/stree/dststructs.mh.rb~:/* with a NIL loop variable  */
./src/stree/dststructs.mh.rb~:    ConsNode * mL__0OP = NIL; \
./src/stree/dststructs.mh.rb~:	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/dststructs.mh.rb~:	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/dststructs.mh.rb~:    } while (mL__0OP != NIL); \
./src/stree/dststructs.mh.rb~:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/dststructs.mh.rb~:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/mknode.tmp.rb:# #  * Other fields are initialized to NIL.
./src/stree/mknode.tmp.rb:        *p = NIL;
./src/stree/mknode.tmp.rb:# #             *p = NIL;
./src/stree/mknode.tmp.rb:# #     if ( p == NIL ) return;
./src/stree/mknode.tmp.rb:# #                         for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/stree/mknode.tmp.rb:# #     p = q = NIL;
./src/stree/mknode.tmp.rb:# #                     p = q = cn_cons(lock(v),NIL);
./src/stree/mknode.tmp.rb:# #                     cn_settail(q, cn_cons(lock(v), NIL));
./src/stree/mknode.tmp.rb:# #     if (l != NIL) {
./src/stree/stptrs.mh.tmp.rb:# # # parameter.  NIL indicates no call */
./src/stree/stptrs.mh.tmp.rb:#     +(1<<22)  # NIL if this represents a coercion */
./src/stree/stptrs.mod.h:/* parameter.  NIL indicates no call */
./src/stree/stptrs.mod.h:   +(1<<22)  /* NIL if this represents a coercion */
./src/stree/stsigs.mh:/* parameter.  NIL indicates no call */
./src/stree/stsigs.mh:    /* NIL if this represents a coercion */
./src/stree/stptrs.mh.rb:# # parameter.  NIL indicates no call */
./src/stree/stptrs.mh.rb:    +(1<<22)  # NIL if this represents a coercion */
./src/stree/stmkfields.mh.tmp.rb:# # # parameter.  NIL indicates no call */
./src/stree/stmkfields.mh.tmp.rb:#     +(1<<22)  # NIL if this represents a coercion */
./src/stree/mknode.c~: * Other fields are initialized to NIL.
./src/stree/mknode.c~:            *p = NIL;
./src/stree/mknode.c~:    if ( p == NIL ) return;
./src/stree/mknode.c~:                        for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/stree/mknode.c~:    p = q = NIL;
./src/stree/mknode.c~:                    p = q = cn_cons(lock(v),NIL);
./src/stree/mknode.c~:                    cn_settail(q, cn_cons(lock(v), NIL));
./src/stree/mknode.c~:    if (l != NIL) {
./src/stree/ststructs.mh:#define NIL 0
./src/stree/ststructs.mh:/* parameter.  NIL indicates no call */
./src/stree/ststructs.mh:#   define mp_type_modifier MPrimary . MPrimary_mp_type_modifier  /* NIL if this represents a coercion */
./src/stree/ststructs.mh:#define is_good(l) ((l) == NIL || \
./src/stree/ststructs.mh:#define is_list(l) ((l) != NIL && \
./src/stree/ststructs.mh:#define is_empty(l) ((l)->lh_first == NIL)
./src/stree/ststructs.mh:#define emptylist() mknode(LISTHEADER,NIL,NIL)
./src/stree/ststructs.mh:    v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/ststructs.mh:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh:#define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/ststructs.mh:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh:if (mL__0OP == NIL) { \
./src/stree/ststructs.mh:if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/ststructs.mh:    if (mL__0O == NIL) { \
./src/stree/ststructs.mh:	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/ststructs.mh:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh:/* with a NIL loop variable  */
./src/stree/ststructs.mh:    ConsNode * mL__0OP = NIL; \
./src/stree/ststructs.mh:	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/ststructs.mh:	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/ststructs.mh:    } while (mL__0OP != NIL); \
./src/stree/ststructs.mh:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/ststructs.mh:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/streedefs.h:				/* parameter.  NIL indicates no call */
./src/stree/streedefs.h:  NODESTAR(mp_type_modifier)    /* NIL if this represents a coercion */
./src/stree/prstree.c:    if (p == NIL) {
./src/stree/prstree.c:        printf("NIL");
./src/stree/prstree.c:            &&arg -> sel_type != NIL) {
./src/stree/prstree.c:                    if (*p == NIL) {
./src/stree/drefops.c: *  If *pp is not NIL, decrement refcount of **pp.
./src/stree/drefops.c: *  Stick v into *pp, and inc refcount of *v if not NIL.
./src/stree/drefops.c:    /* If old value for *pp is not NIL, decrement refcount and free if zero. */
./src/stree/drefops.c:        if ( *rpp != NIL) {
./src/stree/drefops.c:    /* Put new value into field and if v is not NIL etc., inc *v's refcount. */
./src/stree/drefops.c: *  Stick v into *pp, then if v is not NIL, inc *v's refcount.
./src/stree/drefops.c: * p is a node. If p is not NIL, increment its ref count.
./src/stree/drefops.c:    if ( rp != NIL ) {
./src/stree/drefops.c:    if ( rp != NIL ) {
./src/stree/mknode.rb~:#  * Other fields are initialized to NIL.
./src/stree/mknode.rb~:        *p = NIL;
./src/stree/mknode.rb~:#             *p = NIL;
./src/stree/mknode.rb~:#     if ( p == NIL ) return;
./src/stree/mknode.rb~:#                         for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/stree/mknode.rb~:#     p = q = NIL;
./src/stree/mknode.rb~:#                     p = q = cn_cons(lock(v),NIL);
./src/stree/mknode.rb~:#                     cn_settail(q, cn_cons(lock(v), NIL));
./src/stree/mknode.rb~:#     if (l != NIL) {
./src/stree/stmkfields.mod.h:/* parameter.  NIL indicates no call */
./src/stree/stmkfields.mod.h:   +(1<<22)  /* NIL if this represents a coercion */
./src/stree/stsizes.mh.rb:#/* parameter.  NIL indicates no call */
./src/stree/stsizes.mh.rb:#     /* NIL if this represents a coercion */
./src/stree/ststructs.mh~:#define NIL 0
./src/stree/ststructs.mh~:/* parameter.  NIL indicates no call */
./src/stree/ststructs.mh~:#   define mp_type_modifier MPrimary . MPrimary_mp_type_modifier  /* NIL if this represents a coercion */
./src/stree/ststructs.mh~:#define is_good(l) ((l) == NIL || \
./src/stree/ststructs.mh~:#define is_list(l) ((l) != NIL && \
./src/stree/ststructs.mh~:#define is_empty(l) ((l)->lh_first == NIL)
./src/stree/ststructs.mh~:#define emptylist() mknode(LISTHEADER,NIL,NIL)
./src/stree/ststructs.mh~:    v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/ststructs.mh~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh~:#define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/ststructs.mh~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh~:if (mL__0OP == NIL) { \
./src/stree/ststructs.mh~:if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/ststructs.mh~:    if (mL__0O == NIL) { \
./src/stree/ststructs.mh~:	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/ststructs.mh~:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh~:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh~:/* with a NIL loop variable  */
./src/stree/ststructs.mh~:    ConsNode * mL__0OP = NIL; \
./src/stree/ststructs.mh~:	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/ststructs.mh~:	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/ststructs.mh~:    } while (mL__0OP != NIL); \
./src/stree/ststructs.mh~:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/ststructs.mh~:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/#mknode.c#: * Other fields are initialized to NIL.
./src/stree/#mknode.c#:            *p = NIL;
./src/stree/#mknode.c#:            *p = NIL;
./src/stree/#mknode.c#:    if ( p == NIL ) return;
./src/stree/#mknode.c#:                        for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/stree/#mknode.c#:    p = q = NIL;
./src/stree/#mknode.c#:                    p = q = cn_cons(lock(v),NIL);
./src/stree/#mknode.c#:                    cn_settail(q, cn_cons(lock(v), NIL));
./src/stree/#mknode.c#:    if (l != NIL) {
./src/stree/testvertex.c:    p =lock(  mknode(NUMID,1234, NIL)  );
./src/stree/ststructs.mh.rb~:# NIL = 0
./src/stree/ststructs.mh.rb~:  return(mknode(LISTHEADER,NIL,NIL))
./src/stree/ststructs.mh.rb~:  if ((l) != NIL && l[0].kind == LISTHEADER)
./src/stree/ststructs.mh.rb~:  if (l.lh_first == NIL) then
./src/stree/ststructs.mh.rb~:#define NIL 0
./src/stree/ststructs.mh.rb~:/* parameter.  NIL indicates no call */
./src/stree/ststructs.mh.rb~:#   define mp_type_modifier MPrimary . MPrimary_mp_type_modifier  /* NIL if this represents a coercion */
./src/stree/ststructs.mh.rb~:#define is_good(l) ((l) == NIL || \
./src/stree/ststructs.mh.rb~:#define is_list(l) ((l) != NIL && \
./src/stree/ststructs.mh.rb~:#define is_empty(l) ((l)->lh_first == NIL)
./src/stree/ststructs.mh.rb~:#define emptylist() mknode(LISTHEADER,NIL,NIL)
./src/stree/ststructs.mh.rb~:    v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/ststructs.mh.rb~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.rb~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.rb~:#define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/ststructs.mh.rb~:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.rb~:if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.rb~:if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/ststructs.mh.rb~:    if (mL__0O == NIL) { \
./src/stree/ststructs.mh.rb~:	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/ststructs.mh.rb~:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.rb~:    if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.rb~:/* with a NIL loop variable  */
./src/stree/ststructs.mh.rb~:    ConsNode * mL__0OP = NIL; \
./src/stree/ststructs.mh.rb~:	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/ststructs.mh.rb~:	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/ststructs.mh.rb~:    } while (mL__0OP != NIL); \
./src/stree/ststructs.mh.rb~:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/ststructs.mh.rb~:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/stptrs.mod.h~:/* parameter.  NIL indicates no call */
./src/stree/stptrs.mod.h~:   +(1<<22)  /* NIL if this represents a coercion */
./src/stree/stsizes.mh:/* parameter.  NIL indicates no call */
./src/stree/stsizes.mh:    /* NIL if this represents a coercion */
./src/stree/ststructs.mh.tmp.rb:# NIL => 0
./src/stree/ststructs.mh.tmp.rb:  return(mknode(LISTHEADER,NIL,NIL))
./src/stree/ststructs.mh.tmp.rb:  if ((l) != NIL && l[0].kind == LISTHEADER)
./src/stree/ststructs.mh.tmp.rb:  if (l[0].lh_first == NIL) then
./src/stree/ststructs.mh.tmp.rb:# #define NIL 0
./src/stree/ststructs.mh.tmp.rb:# /* parameter.  NIL indicates no call */
./src/stree/ststructs.mh.tmp.rb:# #   define mp_type_modifier MPrimary . MPrimary_mp_type_modifier  /* NIL if this represents a coercion */
./src/stree/ststructs.mh.tmp.rb:# #define is_good(l) ((l) == NIL || \
./src/stree/ststructs.mh.tmp.rb:# #define is_list(l) ((l) != NIL && \
./src/stree/ststructs.mh.tmp.rb:# #define is_empty(l) ((l)->lh_first == NIL)
./src/stree/ststructs.mh.tmp.rb:# #define emptylist() mknode(LISTHEADER,NIL,NIL)
./src/stree/ststructs.mh.tmp.rb:#     v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/ststructs.mh.tmp.rb:#     for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.tmp.rb:#     for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.tmp.rb:# #define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/ststructs.mh.tmp.rb:#     for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.mh.tmp.rb:# if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.tmp.rb:# if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/ststructs.mh.tmp.rb:#     if (mL__0O == NIL) { \
./src/stree/ststructs.mh.tmp.rb:# 	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/ststructs.mh.tmp.rb:#     if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.tmp.rb:#     if (mL__0OP == NIL) { \
./src/stree/ststructs.mh.tmp.rb:# /* with a NIL loop variable  */
./src/stree/ststructs.mh.tmp.rb:#     ConsNode * mL__0OP = NIL; \
./src/stree/ststructs.mh.tmp.rb:# 	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/ststructs.mh.tmp.rb:# 	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/ststructs.mh.tmp.rb:#     } while (mL__0OP != NIL); \
./src/stree/ststructs.mh.tmp.rb:# 		mL__1O != NIL && mL__2O != NIL;\
./src/stree/ststructs.mh.tmp.rb:# 		mL__1O != NIL && mL__2O != NIL;\
./src/stree/ststructs.m:@define NIL 0
./src/stree/ststructs.m:@define is_good(l) ((l) == NIL || \
./src/stree/ststructs.m:@define is_list(l) ((l) != NIL && \
./src/stree/ststructs.m:@define is_empty(l) ((l)->lh_first == NIL)      /* is l an empty list? */
./src/stree/ststructs.m:@define emptylist() mknode(LISTHEADER,NIL,NIL)  /* make an empty list */
./src/stree/ststructs.m:    v = (mL__0O == NIL? NIL: (NODE *) cn_head(mL__0O))
./src/stree/ststructs.m:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.m:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.m:@define LAST_ITER (cn_tail(mL__0O) == NIL)
./src/stree/ststructs.m:    for(mL__0O = ((l) -> lh_first); mL__0O != NIL; mL__0O = cn_tail(mL__0O) ) {\
./src/stree/ststructs.m:if (mL__0OP == NIL) { \
./src/stree/ststructs.m:if (mL__0O == NIL) mL__0OL -> lh_last = mL__0OP;
./src/stree/ststructs.m:    if (mL__0O == NIL) { \
./src/stree/ststructs.m:	dbgmsg("Attempt to delete NIL\n"); \
./src/stree/ststructs.m:    if (mL__0OP == NIL) { \
./src/stree/ststructs.m:    if (mL__0OP == NIL) { \
./src/stree/ststructs.m:						/* with a NIL loop variable  */
./src/stree/ststructs.m:    ConsNode * mL__0OP = NIL; \
./src/stree/ststructs.m:	if (mL__0O != NIL) v = (NODE *) cn_head(mL__0O); else v = NIL; \
./src/stree/ststructs.m:	if (mL__0O != NIL) mL__0O = cn_tail(mL__0O); \
./src/stree/ststructs.m:    } while (mL__0OP != NIL); \
./src/stree/ststructs.m:		mL__1O != NIL && mL__2O != NIL;\
./src/stree/ststructs.m:		mL__1O != NIL && mL__2O != NIL;\
./src/main.save2.rb:# define NIL ((NODE *)0)
./src/main.rb~:# define NIL ((NODE *)0)
./src/gc/gc_private.h:		PCR_Th_SetSigMask(&GC_old_sig_mask, NIL)
./src/gc/gc_private.h:                       /* If not NIL, then a pointer to a map of valid  */
Binary file ./src/gc/debug_malloc.o matches
./src/gc/gc_private.h~:		PCR_Th_SetSigMask(&GC_old_sig_mask, NIL)
./src/gc/gc_private.h~:                       /* If not NIL, then a pointer to a map of valid  */
./src/gc/gc_headers.h:/* beginning of the block or NIL?					*/
./src/gc/gc_headers.h:# define IS_FORWARDING_ADDR_OR_NIL(hhdr) ((unsigned long) (hhdr) <= MAX_JUMP)
./src/gc/misc.c:	while (IS_FORWARDING_ADDR_OR_NIL(candidate_hdr)) {
Binary file ./src/gc/gc.a matches
./src/gc/mark_roots.c:          while (p != NIL && !(p -> lf_commitPoint)) {
./src/gc/mark_roots.c:          for (; p != NIL; p = p -> lf_prev) {
./src/gc/mark_roots.c:            for (q = p -> lf_ls; q != NIL; q = q -> ls_next) {
./src/gc/mark.c:      if (IS_FORWARDING_ADDR_OR_NIL(hhdr)) {
./src/gc/mark.c:	    } while(IS_FORWARDING_ADDR_OR_NIL(hhdr));
./src/gc/test.c:        (void)printf("NIL\n");
./src/gc/test.c:    if (PCR_Th_T_Join(th1, &code, NIL, PCR_allSigsBlocked, PCR_waitForever)
./src/gc/test.c:    if (PCR_Th_T_Join(th2, &code, NIL, PCR_allSigsBlocked, PCR_waitForever)
./src/gc/dynamic_load.c:                if( lm != 0 ) cachedResult = lm->l_next; /* might be NIL */
./src/gc/debug_malloc.c:/* return NIL if it's OK.  Else return clobbered	*/
./src/gc/debug_malloc.c:        GC_err_printf1("GC_debug_malloc(%ld) returning NIL (",
./src/gc/debug_malloc.c:        GC_err_printf1("GC_debug_malloc_atomic(%ld) returning NIL (",
./src/gc/headers.c:                if (!IS_FORWARDING_ADDR_OR_NIL(index_p[j])) {
./src/gc/README:NIL.
./src/parm.rb~:      if (err_node != NIL) { \
./src/parm.rb~:      if (err_node != NIL) { \
Binary file ./src/PRc matches
./src/pass3/gden_order.c:		NIL, NIL /* may be wrong, but no -1 stt indicees
./src/pass3/gden_order.c:	i = comp_st((*p) -> ge_element, (*q) -> ge_element, NIL, NIL);
./src/pass3/reorder.c:    if (p == NIL) return;
./src/pass3/tsig_order.c~:		    a->a_body[i] = NIL;
./src/pass3/tsig_order.c~:			    a->a_body[i] = NIL;
./src/pass3/tsig_order.c~:			    || csig -> fsig_inline_code != NIL
./src/pass3/tsig_order.c~:			    || csig -> fsig_construction != NIL) {
./src/pass3/tsig_order.c~:			    if (constants -> dcs_exceptions == NIL) {
./src/pass3/tsig_order.c~:    /* Remove all NIL array entries */
./src/pass3/tsig_order.c~:	    if(a->a_body[j] != NIL) {
./src/pass3/tsig_order.c~:		    a->a_body[j] = NIL;
./src/pass3/tsig_order.c~:    if(sig == NIL) return(FALSE);
./src/pass3/tsig_order.c~:       && sig -> id_last_definition != NIL
./src/pass3/tsig_order.c~:	if (s == NIL || s -> dcse_char > character) {
./src/pass3/tsig_order.c:		    a->a_body[i] = NIL;
./src/pass3/tsig_order.c:			    a->a_body[i] = NIL;
./src/pass3/tsig_order.c:			    || csig -> fsig_inline_code != NIL
./src/pass3/tsig_order.c:			    || csig -> fsig_construction != NIL) {
./src/pass3/tsig_order.c:			    if (constants -> dcs_exceptions == NIL) {
./src/pass3/tsig_order.c:    /* Remove all NIL array entries */
./src/pass3/tsig_order.c:	    if(a->a_body[j] != NIL) {
./src/pass3/tsig_order.c:		    a->a_body[j] = NIL;
./src/pass3/tsig_order.c:    if(sig == NIL) return(FALSE);
./src/pass3/tsig_order.c:       && sig -> id_last_definition != NIL
./src/pass3/tsig_order.c:	if (s == NIL || s -> dcse_char > character) {
./src/pass3/expand_str.c:        if (string -> sel_type == NIL) {
./src/pass3/sigids.c:static NODE * curr_void_decl = NIL;
./src/pass3/sigids.c:static NODE * curr_sig_transp = NIL;
./src/pass3/sigids.c:    if (p == NIL) return;
./src/pass3/sigids.c:            if ( p -> sel_type != NIL ) {
./src/pass3/sigids.c:		p -> id_last_definition = NIL;
./src/pass3/sigids.c:		if (p -> signature != NIL && p -> sig_done != SIG_DONE) {
./src/pass3/sigids.c:		if (curr_sig_transp != NIL
./src/pass3/sigids.c:		    && p -> id_last_definition != NIL) {
./src/pass3/sigids.c:			if (id_def != NIL &&
./src/pass3/sigids.c:			    (imid == NIL
./src/pass3/sigids.c:		if (p -> id_last_definition == NIL
./src/pass3/sigids.c:		    while (usl != NIL) {
./src/pass3/sigids.c:			     || s -> signature != NIL
./src/pass3/sigids.c:			     || s -> sel_type != NIL) {
./src/pass3/sigids.c:				if (def == NIL ||
./src/pass3/sigids.c:				    def ->decl_signature == NIL)) {
./src/pass3/sigids.c:            if ( p -> sel_type != NIL ) {
./src/pass3/sigids.c:		while (usl != NIL) {
./src/pass3/sigids.c:			     || s -> signature != NIL
./src/pass3/sigids.c:			     || s -> sel_type != NIL) {
./src/pass3/sigids.c:			    if (def == NIL ||
./src/pass3/sigids.c:				 def ->decl_signature == NIL)) {
./src/pass3/sigids.c:              if (p -> fc_code_label == NIL) {
./src/pass3/sigids.c:				var_Void, NIL, NIL) == 0) {
./src/pass3/sigids.c:		&& p -> decl_denotation -> fc_code_label == NIL) {
./src/pass3/sigids.c:    if (p == NIL) return;
./src/pass3/sigids.c:	   && p -> sel_type == NIL
./src/pass3/sigids.c:	   && p -> id_last_definition != NIL
./src/pass3/sigids.c:		if ( p -> id_last_definition == NIL
./src/pass3/sigids.c:				sig_Signature, NIL, NIL) != 0) {
./src/pass3/comp_st.c: * identifier which appears with NIL sel_type in an expression context.
./src/pass3/comp_st.c: * They are set to NIL if this is not the case.
./src/pass3/comp_st.c: *      0.  NIL is less than anything else.
./src/pass3/comp_st.c:    diff_p = NIL;
./src/pass3/comp_st.c:    diff_q = NIL;
./src/pass3/comp_st.c:    if (tsigp != NIL && tsigq != NIL) {
./src/pass3/comp_st.c:      if (tsigp != NIL && tsigq != NIL) {
./src/pass3/comp_st.c:    if (q == NIL) return(p != NIL /* 0 if both NIL, 1 o.w. */);
./src/pass3/comp_st.c:    if (p == NIL) return(-1);
./src/pass3/comp_st.c:            && p -> sel_type != NIL) {
./src/pass3/comp_st.c:            if (p -> str_expansion == NIL) {
./src/pass3/comp_st.c:            && q -> sel_type != NIL) {
./src/pass3/comp_st.c:            if (q -> str_expansion == NIL) {
./src/pass3/comp_st.c:	if (p -> kind == MODPRIMARY && p -> mp_type_modifier == NIL) {
./src/pass3/comp_st.c:	} else if (q -> kind == MODPRIMARY && q -> mp_type_modifier == NIL) {
./src/pass3/comp_st.c:		   && p -> sel_type == NIL
./src/pass3/comp_st.c:		   && p -> id_last_definition != NIL
./src/pass3/comp_st.c:		   && q -> sel_type == NIL
./src/pass3/comp_st.c:		   && q -> id_last_definition != NIL
./src/pass3/comp_st.c:		   || p -> sel_type != NIL
./src/pass3/comp_st.c:		   || q -> sel_type != NIL) {
./src/pass3/comp_st.c:			if(p_indx==-1 && tsigp==NIL || q_indx==-1 && tsigq==NIL) {
./src/pass3/comp_st.c:		    if (p_decl != NIL && q_decl != NIL
./src/pass3/comp_st.c:		    if (p_decl != NIL && q_decl != NIL &&
./src/pass3/comp_st.c:		    if (p_decl == NIL && q_decl == NIL
./src/pass3/comp_st.c:		    if (p_decl == NIL && q_decl == NIL) {
./src/pass3/comp_st.c:		    if (q_decl == NIL) return (1);
./src/pass3/comp_st.c:		    if (p_decl == NIL) return (-1);
./src/pass3/number.c:    if ( p == NIL ) return;
./src/pass3/decl_pairs.c:	for(tl = decl_list; tl != NIL; tl = cn_tail(tl)) {
./src/pass3/decl_pairs.c:	for(tl = decl_list; tl != NIL; tl = cn_tail(tl)) {
./src/parm.rb:      if (err_node != NIL) { \
./src/parm.rb:      if (err_node != NIL) { \
./src/main.tmp:# define NIL ((NODE *)0)
./src/#main.tmp.rb#:# define NIL ((NODE *)0)
./src/parm.h~:      if (err_node != NIL) { \
./src/parm.h~:      if (err_node != NIL) { \
./src/mknode.rb~: * Other fields are initialized to NIL.
./src/mknode.rb~:            *p = NIL;
./src/mknode.rb~:    if ( p == NIL ) return;
./src/mknode.rb~:                        for ( c = p -> lh_first; c != NIL; c = cn_del_hd(c) );
./src/mknode.rb~:    p = q = NIL;
./src/mknode.rb~:                    p = q = cn_cons(lock(v),NIL);
./src/mknode.rb~:                    cn_settail(q, cn_cons(lock(v), NIL));
./src/mknode.rb~:    if (l != NIL) {
./src/datatypes/consnodes.tmp.rb:        p = ConsNode.new(NIL,NIL)
./src/datatypes/consnodes.h:# define NIL 0
./src/datatypes/consnodes.h:# define is_null_cn(l) ( (l) == NIL )
./src/datatypes/consnodes.rb~:        p = ConsNode.new(NIL,NIL)
./src/datatypes/stack.h:# define emptystack() NIL
./src/datatypes/consnodes.h.rb~:# define NIL 0
./src/datatypes/consnodes.h.rb~:# define is_null_cn(l) ( (l) == NIL )
./src/datatypes/consnodes.rb:        p = ConsNode.new(NIL,NIL)
./src/datatypes/consnodes.h.tmp.rb:# # define NIL 0
./src/datatypes/consnodes.h.tmp.rb:# # define is_null_cn(l) ( (l) == NIL )
./src/datatypes/consnodes.h.rb:# define NIL 0
./src/datatypes/consnodes.h.rb:# define is_null_cn(l) ( (l) == NIL )
./src/parm.h:      if (err_node != NIL) { \
./src/parm.h:      if (err_node != NIL) { \
./src/pass5c/appl.c:    char * in_line;     /* in-line code, NIL if not known */
./src/pass5c/appl.c:		  if (op_kind != LETTERID || op -> sel_type == NIL) {
./src/pass5c/appl.c:		  size_sig = getcomp(sel_type_sig, id_size, NIL, NIL,
./src/pass5c/appl.c:				     NIL, NIL, NIL, FALSE);
./src/pass5c/appl.c:		  if (size_sig == NIL || special_tp(size_sig -> fsig_special)
./src/pass5c/appl.c:          in_line = NIL;
./src/pass5c/appl.c:      if (in_line == NIL) {
./src/pass5c/appl.c:      if (construction != NIL) {
./src/pass5c/appl.c:    if (in_line != NIL) {
./src/pass5c/appl.c:	if (construction == NIL) {
./src/pass5c/appl.c:      if (construction != NIL) {
./src/pass5c/appl.c:      if (construction == NIL
./src/pass5c/appl.c:	  if (construction != NIL && slink_known) {
./src/pass5c/appl.c:          if (construction == NIL || !slink_known) {
./src/pass5c/appl.c:	  if (construction == NIL) {
./src/pass5c/appl.c:	if (construction == NIL || !slink_known) {
./src/pass5c/appl.c:	if (construction != NIL) {
./src/pass5c/appl.c:      } else /* stack call */ if (construction == NIL) {
./src/pass5c/analyze.c:    } else if (p -> sel_type == NIL) {
./src/pass5c/analyze.c:NODE * outer_fc = NIL;  /* Outermost function construction, excl. */
./src/pass5c/analyze.c:	all_fcs = all_fcs_tail = NIL;
./src/pass5c/analyze.c:    result -> fcs_next = NIL;
./src/pass5c/analyze.c:    result -> fcs_called = NIL;
./src/pass5c/analyze.c:    if (all_fcs == NIL)  {
./src/pass5c/analyze.c:    for (q = p -> fcs_called; q != NIL; q = q -> cf_next) {
./src/pass5c/analyze.c:	for (p = all_fcs; p != NIL; p = p -> fcs_next) {
./src/pass5c/analyze.c:    for (p = all_fcs; p != NIL; p = p -> fcs_next) {
./src/pass5c/analyze.c:	  if (p -> fcs_called != NIL) {
./src/pass5c/analyze.c:	    for (q = p -> fcs_called; q != NIL; q = q -> cf_next) {
./src/pass5c/analyze.c:    while (p != NIL) {
./src/pass5c/analyze.c:	  while (q != NIL) {
./src/pass5c/analyze.c:		if (t1 -> sel_type != NIL) {
./src/pass5c/analyze.c:		    if (tm == NIL
./src/pass5c/analyze.c:	    if (p -> sel_type != NIL) {
./src/pass5c/analyze.c:		    if (real_tp -> sel_type != NIL) {
./src/pass5c/analyze.c:    if (p == NIL) return;
./src/pass5c/analyze.c:	    if (p -> sel_type != NIL) {
./src/pass5c/analyze.c:		       && (outer_fc == NIL || !is_local(p, outer_fc))));
./src/pass5c/analyze.c:		  has_inline = (op_sig -> fsig_inline_code != NIL)
./src/pass5c/analyze.c:			if (!Gflag || op_sig -> fsig_construction == NIL
./src/pass5c/analyze.c:		    if (op_sig -> fsig_construction == NIL) {
./src/pass5c/analyze.c:		      && (op_sig -> fsig_construction == NIL
./src/pass5c/analyze.c:			  if (p -> fc_code_label == NIL) {
./src/pass5c/analyze.c:		      if (p != whole_program && outer_fc == NIL) {
./src/pass5c/analyze.c:		if (p -> mp_type_modifier != NIL
./src/pass5c/analyze.c:		    if (tsig -> ts_string_code != NIL
./src/pass5c/analyze.c:			&& tsig -> ts_element_code != NIL
./src/pass5c/analyze.c~:    } else if (p -> sel_type == NIL) {
./src/pass5c/analyze.c~:NODE * outer_fc = NIL;  /* Outermost function construction, excl. */
./src/pass5c/analyze.c~:	all_fcs = all_fcs_tail = NIL;
./src/pass5c/analyze.c~:    result -> fcs_next = NIL;
./src/pass5c/analyze.c~:    result -> fcs_called = NIL;
./src/pass5c/analyze.c~:    if (all_fcs == NIL)  {
./src/pass5c/analyze.c~:    for (q = p -> fcs_called; q != NIL; q = q -> cf_next) {
./src/pass5c/analyze.c~:	for (p = all_fcs; p != NIL; p = p -> fcs_next) {
./src/pass5c/analyze.c~:    for (p = all_fcs; p != NIL; p = p -> fcs_next) {
./src/pass5c/analyze.c~:	  if (p -> fcs_called != NIL) {
./src/pass5c/analyze.c~:	    for (q = p -> fcs_called; q != NIL; q = q -> cf_next) {
./src/pass5c/analyze.c~:    while (p != NIL) {
./src/pass5c/analyze.c~:	  while (q != NIL) {
./src/pass5c/analyze.c~:		if (t1 -> sel_type != NIL) {
./src/pass5c/analyze.c~:		    if (tm == NIL
./src/pass5c/analyze.c~:	    if (p -> sel_type != NIL) {
./src/pass5c/analyze.c~:		    if (real_tp -> sel_type != NIL) {
./src/pass5c/analyze.c~:    if (p == NIL) return;
./src/pass5c/analyze.c~:	    if (p -> sel_type != NIL) {
./src/pass5c/analyze.c~:		       && (outer_fc == NIL || !is_local(p, outer_fc))));
./src/pass5c/analyze.c~:		  has_inline = (op_sig -> fsig_inline_code != NIL)
./src/pass5c/analyze.c~:			if (!Gflag || op_sig -> fsig_construction == NIL
./src/pass5c/analyze.c~:		    if (op_sig -> fsig_construction == NIL) {
./src/pass5c/analyze.c~:		      && (op_sig -> fsig_construction == NIL
./src/pass5c/analyze.c~:			  if (p -> fc_code_label == NIL) {
./src/pass5c/analyze.c~:		      if (p != whole_program && outer_fc == NIL) {
./src/pass5c/analyze.c~:		if (p -> mp_type_modifier != NIL
./src/pass5c/analyze.c~:		    if (tsig -> ts_string_code != NIL
./src/pass5c/analyze.c~:			&& tsig -> ts_element_code != NIL
./src/pass5c/allocate.c:} * Vcurrent_blocks = NIL;
./src/pass5c/allocate.c:    while (Vcurrent_blocks != NIL) {
./src/pass5c/allocate.c:      for(p = Vcurrent_blocks; p != NIL; p = p -> bl_next) {
./src/pass5c/allocate.c:	&& (block -> bld_declaration_list == NIL
./src/pass5c/allocate.c:    if (p == NIL) return;
./src/pass5c/allocate.c:		if (Vflag && p -> par_id != NIL
./src/pass5c/allocate.c:		    if (p -> bld_declaration_list != NIL) {
./src/pass5c/allocate.c:			Vcurrent_blocks = NIL;
./src/pass5c/allocate.c:		if (p -> sel_type != NIL) {
./src/pass5c/allocate.c:		if (p -> mp_type_modifier != NIL
./src/pass5c/allocate.c:		if (p -> mp_type_modifier != NIL
./src/pass5c/allocate.c:	Vcurrent_blocks = NIL;
./src/pass5c/find_inline.c:    if (fsig -> fsig_inline_code != NIL) return;
./src/pass5c/find_inline.c:                 == NIL) {
./src/pass5c/find_inline.c:	    (code = p -> ap_operator -> signature -> fsig_inline_code) != NIL &&
./src/pass5c/find_inline.c:	for (p = body; p != NIL && p -> kind != LETTERID;
./src/pass5c/find_inline.c:             p = is_empty(p -> ap_args)? NIL : first(p -> ap_args)) {
./src/pass5c/bld_analyze.c:	    if (p -> mp_type_modifier != NIL
./src/pass5c/bld_analyze.c:	    if (p -> sel_type != NIL) {
./src/pass5c/Fcodegen.c:		    if (p -> sel_type == NIL) {
./src/pass5c/Fcodegen.c:			ASSERT2 (v != NIL, "Fexpression: id %s not declared\n", 
./src/pass5c/Fcodegen.c:		    if (sig -> ts_string_code != NIL 
./src/pass5c/Fcodegen.c:			&& sig -> ts_element_code != NIL
./src/pass5c/Fcodegen.c:		    char * in_line;     /* in-line code, NIL if not known */
./src/pass5c/Fcodegen.c:		    if (in_line != NIL) {
./src/pass5c/accessible.c~:    if (decl_sig == NIL) {
./src/pass5c/accessible.c~:	if (p -> sel_type != NIL) {
./src/pass5c/accessible.c~:    if (p == NIL) return;
./src/pass5c/accessible.c~:		    if (v -> fsig_inline_code == NIL
./src/pass5c/accessible.c~:			&& v -> fsig_construction != NIL) {
./src/pass5c/accessible.c~:		} else if (v -> fsig_inline_code == NIL) {
./src/pass5c/accessible.c~:		    if (Oflag && v -> fsig_construction != NIL) {
./src/pass5c/accessible.c~:			    if (f -> par_only_def == NIL
./src/pass5c/accessible.c~:					      NIL, NIL) == 0) {
./src/pass5c/accessible.c~:		    if (v -> fsig_construction != NIL &&
./src/pass5c/accessible.c~:			       == NIL) {
./src/pass5c/accessible.c~:			    if (v -> fsig_construction == NIL) {
./src/pass5c/accessible.c~:			if (v -> fsig_construction != NIL
./src/pass5c/accessible.c~:			       == NIL) {
./src/pass5c/accessible.c~:			       && v -> fsig_inline_code != NIL) {
./src/pass5c/accessible.c~:				&& s -> sel_type == NIL
./src/pass5c/accessible.c~:		  if (p -> mp_type_modifier != NIL
./src/pass5c/accessible.c~:		    if (sig -> ts_string_code != NIL 
./src/pass5c/accessible.c~:			&& sig -> ts_element_code != NIL
./src/pass5c/accessible.c~:    if (p == NIL) return;
./src/pass5c/accessible.c~:		if (p -> sel_type != NIL) {
./src/pass5c/accessible.c~:		    if (p -> mp_type_modifier != NIL
./src/pass5c/decl_sort.c:			      /* sorting with list. NIL o.w.               */
./src/pass5c/decl_sort.c:	current_mp = NIL;
./src/pass5c/decl_sort.c:			if (den -> mp_type_modifier == NIL
./src/pass5c/decl_sort.c:	current_scope = NIL;
./src/pass5c/decl_sort.c:		if (tm != NIL && tm -> kind == WITHLIST) {
./src/pass5c/decl_sort.c:	    if (current_mp == NIL) /* normal declarations */ {
./src/pass5c/decl_sort.c:                if (p -> sel_type != NIL) {
./src/pass5c/decl_sort.c:		if (sel_t == NIL) {
./src/pass5c/decl_sort.c:		} else /* sel_type not NIL */ {
./src/pass5c/decl_sort.c:			 && sel_t -> sel_type == NIL
./src/pass5c/decl_sort.c:	    if (current_mp != NIL) {
./src/pass5c/decl_sort.c:                  if (p -> sel_type -> signature -> ts_string_code != NIL &&
./src/pass5c/decl_sort.c:                      p -> sel_type -> signature -> ts_element_code != NIL) {
./src/pass5c/decl_sort.c:		if (tm != NIL && tm -> kind == WITHLIST) {
./src/pass5c/decl_sort.c:	    if (current_mp == NIL) /* normal declarations */ {
./src/pass5c/decl_sort.c:                if (p -> sel_type != NIL) {
./src/pass5c/decl_sort.c:                if (sel_t != NIL) {
./src/pass5c/decl_sort.c:			 && sel_t -> sel_type == NIL
./src/pass5c/decl_sort.c:	    if (current_mp != NIL) {
./src/pass5c/decl_sort.c:                  if (p -> sel_type -> signature -> ts_string_code != NIL &&
./src/pass5c/decl_sort.c:                      p -> sel_type -> signature -> ts_string_code != NIL) {
./src/pass5c/codeutil.c: * of put from the parameter type, or NIL if no appropriate function
./src/pass5c/codeutil.c: * exists.  (Used for trace code).  NIL is also returned if the
./src/pass5c/codeutil.c:            return(NIL);
./src/pass5c/codeutil.c:        || type -> sel_type != NIL) return(NIL);
./src/pass5c/codeutil.c:            return (NIL);
./src/pass5c/codeutil.c:    if (type -> signature == ERR_SIG) return(NIL);
./src/pass5c/codeutil.c:    if (p -> par_id != NIL) {
./src/pass5c/codeutil.c:      getcomp(type -> signature, id_put, type, NIL, NIL, appl, TRUE);
./src/pass5c/codeutil.c:    if (comp_sig == NIL) {
./src/pass5c/codeutil.c:        return(NIL);
./src/pass5c/codeutil.c:      if (put_sel != NIL) {
./src/pass5c/accessible.c:    if (decl_sig == NIL) {
./src/pass5c/accessible.c:	if (p -> sel_type != NIL) {
./src/pass5c/accessible.c:    if (p == NIL) return;
./src/pass5c/accessible.c:		    if (v -> fsig_inline_code == NIL
./src/pass5c/accessible.c:			&& v -> fsig_construction != NIL) {
./src/pass5c/accessible.c:		} else if (v -> fsig_inline_code == NIL) {
./src/pass5c/accessible.c:		    if (Oflag && v -> fsig_construction != NIL) {
./src/pass5c/accessible.c:			    if (f -> par_only_def == NIL
./src/pass5c/accessible.c:					      NIL, NIL) == 0) {
./src/pass5c/accessible.c:		    if (v -> fsig_construction != NIL &&
./src/pass5c/accessible.c:			       == NIL) {
./src/pass5c/accessible.c:			    if (v -> fsig_construction == NIL) {
./src/pass5c/accessible.c:			if (v -> fsig_construction != NIL
./src/pass5c/accessible.c:			       == NIL) {
./src/pass5c/accessible.c:			       && v -> fsig_inline_code != NIL) {
./src/pass5c/accessible.c:				&& s -> sel_type == NIL
./src/pass5c/accessible.c:		  if (p -> mp_type_modifier != NIL
./src/pass5c/accessible.c:		    if (sig -> ts_string_code != NIL 
./src/pass5c/accessible.c:			&& sig -> ts_element_code != NIL
./src/pass5c/accessible.c:    if (p == NIL) return;
./src/pass5c/accessible.c:		if (p -> sel_type != NIL) {
./src/pass5c/accessible.c:		    if (p -> mp_type_modifier != NIL
./src/pass5c/codegen.c:fc_entry * fc_list = NIL;
./src/pass5c/codegen.c:    while (fc_list != NIL) {
./src/pass5c/codegen.c:    while (fc_list != NIL) {
./src/pass5c/codegen.c:		    if (p -> sel_type == NIL) {
./src/pass5c/codegen.c:			ASSERT2 (v != NIL, "Vexpression: id %s not declared\n", 
./src/pass5c/codegen.c:		    know_inline = (sig -> ts_string_code != NIL 
./src/pass5c/codegen.c:				   && sig -> ts_element_code != NIL
./src/pass5c/codegen.c:		    boolean is_wl = (tm == NIL? FALSE
./src/pass5c/codegen.c:			  /* s := first element of with list, NIL if there */
./src/pass5c/codegen.c:			      s = NIL;
./src/pass5c/codegen.c:			  while (s != NIL || i < orig) {
./src/pass5c/codegen.c:			    if (s != NIL && s -> decl_sel_index == res_pos) {
./src/pass5c/codegen.c:			  if (dcs -> dcs_exceptions != NIL) {
./src/pass5c/codegen.c:	    if (val > MAX_PROD_EXP_LEN) return(NIL);
./src/pass5c/codegen.c:	    return(NIL);
./src/pass5c/bld_analyze.c~:	    if (p -> mp_type_modifier != NIL
./src/pass5c/bld_analyze.c~:	    if (p -> sel_type != NIL) {
./src/main.tmp.save.rb:# define NIL ((NODE *)0)
./src/pass1/stt/stt.rb:    /* strings and and setting their initial Idtable value to NIL.     */
./src/pass1/stt/stt.rb:                Ide->i_value = NIL;
./src/pass1/stt/stt.tmp.rb:#     /* strings and and setting their initial Idtable value to NIL.     */
./src/pass1/stt/stt.tmp.rb:#                 Ide->i_value = NIL;
./src/pass1/stt/stt.c:    /* strings and and setting their initial Idtable value to NIL.     */
./src/pass1/stt/stt.c:                Ide->i_value = NIL;
./src/pass1/stt/stt.rb~:    /* strings and and setting their initial Idtable value to NIL.     */
./src/pass1/stt/stt.rb~:                Ide->i_value = NIL;
./src/pass1/applinfer/outermost_op.c:                    op = NIL;
./src/pass1/applinfer/outermost_op.c:                    if ( op == NIL ) {
./src/pass1/applinfer/outermost_op.c:                        /* there's no reasonable operator, return the NIL */
./src/pass1/applinfer/outermost_op.c:			    op = NIL;
./src/pass1/applinfer/mkappl2.c:	if( op == NIL ) {
./src/pass1/scanner/scan.c~:#define     NIL     0
./src/pass1/scanner/scan.c~:vrline * vrtable = NIL,  /* pointers to first and last table entries */
./src/pass1/scanner/scan.c~:       * vrtend  = NIL;
./src/pass1/scanner/scan.c~:    if (vrtable == NIL) 
./src/pass1/scanner/scan.c~:    (p -> vr_next ) = NIL;
./src/pass1/scanner/scan.c:#define     NIL     0
./src/pass1/scanner/scan.c:vrline * vrtable = NIL,  /* pointers to first and last table entries */
./src/pass1/scanner/scan.c:       * vrtend  = NIL;
./src/pass1/scanner/scan.c:    if (vrtable == NIL) 
./src/pass1/scanner/scan.c:    (p -> vr_next ) = NIL;
./src/pass1/parser/initids.c:                                 NIL,
./src/pass1/parser/initids.c:                                 NIL,
./src/pass1/parser/initids.c:	sig_assign = lock( mknode(FUNCSIGNATURE, NIL /* inline */, as_params,
./src/pass1/parser/initids.c:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,
./src/pass1/parser/initids.c:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,val_Boolean) );
./src/pass1/parser/initids.c:	sig_New = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.c:	sig_const = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.c:	sig_ValueOf = lock( mknode(FUNCSIGNATURE, NIL,
./src/pass1/parser/grammar.y:    NODE * insrtptr = NIL;  /* pointer to dummy BLOCKDENOTATION vertex into */
./src/pass1/parser/grammar.y:    NODE * stxtree = NIL; /* pointer to root of syntax tree */
./src/pass1/parser/grammar.y:        { if (stxtree != NIL) {
./src/pass1/parser/grammar.y:		if ($1 != NIL)
./src/pass1/parser/grammar.y:                && (id_Boolean -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y:                && (id_Void -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y:                && (id_Integer -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y:		&& (id_Null -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y:        {  $$ = mklist( mknode(PARAMETER,NIL,$1), -1 ); }
./src/pass1/parser/grammar.y:	  $$ = mknode(TYPESIGNATURE,$10,$12,$5,$6,$7,NIL);
./src/pass1/parser/grammar.y:	  $$ = mknode(TYPESIGNATURE,$9,$11,$5,$6,$7,NIL);
./src/pass1/parser/grammar.y:	  $$ = mknode(TYPESIGNATURE,$7,$9,$5,NIL,NIL,NIL);
./src/pass1/parser/grammar.y:	  $$ = mknode(TYPESIGNATURE,$5,$7,NIL,NIL,NIL,NIL);
./src/pass1/parser/grammar.y:	  $$ = mknode(TYPESIGNATURE,$2,$4,NIL,NIL,NIL,NIL);
./src/pass1/parser/grammar.y:	    $$ = NIL;
./src/pass1/parser/grammar.y:	{ $$ = NIL; }
./src/pass1/parser/grammar.y:	    $$ = NIL;
./src/pass1/parser/grammar.y:	  if ($2 != NIL) {
./src/pass1/parser/grammar.y:        { $$ = NIL; }
./src/pass1/parser/grammar.y:                                NIL,  /* in-line code */
./src/pass1/parser/grammar.y:                                              NIL,
./src/pass1/parser/grammar.y:                                  NIL,  /* in-line code */
./src/pass1/parser/grammar.y:                                                NIL,
./src/pass1/parser/grammar.y:		$$ = insrtptr = mknode(BLOCKDENOTATION,emptylist(),NIL);
./src/pass1/parser/grammar.y:	{ $$ = mknode(MODPRIMARY,$1,$2,NIL); }
./src/pass1/parser/grammar.y:        { $$ = NIL; }
./src/pass1/parser/grammar.y:	  if ($1 -> fsig_result_sig == NIL) {
./src/pass1/parser/grammar.y:	  $$ = mknode(FUNCSIGNATURE, $3, $5, NIL);
./src/pass1/parser/grammar.y:	{ $$ = mknode(FUNCSIGNATURE, $2, $4, NIL); }
./src/pass1/parser/grammar.y:        { $$ = NIL; }
./src/pass1/parser/grammar.y:            if (s -> par_id == NIL) {
./src/pass1/parser/grammar.y:            if (s -> par_id == NIL) {
./src/pass1/parser/grammar.y:        { $$ = NIL; }
./src/pass1/parser/grammar.y:        { $$ = NIL; }
./src/pass1/parser/grammar.y~:    NODE * insrtptr = NIL;  /* pointer to dummy BLOCKDENOTATION vertex into */
./src/pass1/parser/grammar.y~:    NODE * stxtree = NIL; /* pointer to root of syntax tree */
./src/pass1/parser/grammar.y~:        { if (stxtree != NIL) {
./src/pass1/parser/grammar.y~:		if ($1 != NIL)
./src/pass1/parser/grammar.y~:                && (id_Boolean -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y~:                && (id_Void -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y~:                && (id_Integer -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y~:		&& (id_Null -> id_last_definition == NIL)) {
./src/pass1/parser/grammar.y~:        {  $$ = mklist( mknode(PARAMETER,NIL,$1), -1 ); }
./src/pass1/parser/grammar.y~:	  $$ = mknode(TYPESIGNATURE,$10,$12,$5,$6,$7,NIL);
./src/pass1/parser/grammar.y~:	  $$ = mknode(TYPESIGNATURE,$9,$11,$5,$6,$7,NIL);
./src/pass1/parser/grammar.y~:	  $$ = mknode(TYPESIGNATURE,$7,$9,$5,NIL,NIL,NIL);
./src/pass1/parser/grammar.y~:	  $$ = mknode(TYPESIGNATURE,$5,$7,NIL,NIL,NIL,NIL);
./src/pass1/parser/grammar.y~:	  $$ = mknode(TYPESIGNATURE,$2,$4,NIL,NIL,NIL,NIL);
./src/pass1/parser/grammar.y~:	    $$ = NIL;
./src/pass1/parser/grammar.y~:	{ $$ = NIL; }
./src/pass1/parser/grammar.y~:	    $$ = NIL;
./src/pass1/parser/grammar.y~:	  if ($2 != NIL) {
./src/pass1/parser/grammar.y~:        { $$ = NIL; }
./src/pass1/parser/grammar.y~:                                NIL,  /* in-line code */
./src/pass1/parser/grammar.y~:                                              NIL,
./src/pass1/parser/grammar.y~:                                  NIL,  /* in-line code */
./src/pass1/parser/grammar.y~:                                                NIL,
./src/pass1/parser/grammar.y~:		$$ = insrtptr = mknode(BLOCKDENOTATION,emptylist(),NIL);
./src/pass1/parser/grammar.y~:	{ $$ = mknode(MODPRIMARY,$1,$2,NIL); }
./src/pass1/parser/grammar.y~:        { $$ = NIL; }
./src/pass1/parser/grammar.y~:	  if ($1 -> fsig_result_sig == NIL) {
./src/pass1/parser/grammar.y~:	  $$ = mknode(FUNCSIGNATURE, $3, $5, NIL);
./src/pass1/parser/grammar.y~:	{ $$ = mknode(FUNCSIGNATURE, $2, $4, NIL); }
./src/pass1/parser/grammar.y~:        { $$ = NIL; }
./src/pass1/parser/grammar.y~:            if (s -> par_id == NIL) {
./src/pass1/parser/grammar.y~:            if (s -> par_id == NIL) {
./src/pass1/parser/grammar.y~:        { $$ = NIL; }
./src/pass1/parser/grammar.y~:        { $$ = NIL; }
./src/pass1/parser/initids.rb:                                 NIL,
./src/pass1/parser/initids.rb:                                 NIL,
./src/pass1/parser/initids.rb:	sig_assign = lock( mknode(FUNCSIGNATURE, NIL, as_params,
./src/pass1/parser/initids.rb:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,
./src/pass1/parser/initids.rb:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,val_Boolean) )
./src/pass1/parser/initids.rb:	sig_New = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.rb:	sig_const = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.rb:	sig_ValueOf = lock( mknode(FUNCSIGNATURE, NIL,
./src/pass1/parser/initids.rb~:                                 NIL,
./src/pass1/parser/initids.rb~:                                 NIL,
./src/pass1/parser/initids.rb~:	sig_assign = lock( mknode(FUNCSIGNATURE, NIL, as_params,
./src/pass1/parser/initids.rb~:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,
./src/pass1/parser/initids.rb~:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,val_Boolean) )
./src/pass1/parser/initids.rb~:	sig_New = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.rb~:	sig_const = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.rb~:	sig_ValueOf = lock( mknode(FUNCSIGNATURE, NIL,
./src/pass1/parser/#grammar.y#:    NODE * insrtptr = NIL;  /* pointer to dummy BLOCKDENOTATION vertex into */
./src/pass1/parser/#grammar.y#:    NODE * stxtree = NIL; /* pointer to root of syntax tree */
./src/pass1/parser/#grammar.y#:        { if (stxtree != NIL) {
./src/pass1/parser/#grammar.y#:		if ($1 != NIL)
./src/pass1/parser/#grammar.y#:                && (id_Boolean -> id_last_definition == NIL)) {
./src/pass1/parser/#grammar.y#:                && (id_Void -> id_last_definition == NIL)) {
./src/pass1/parser/#grammar.y#:                && (id_Integer -> id_last_definition == NIL)) {
./src/pass1/parser/#grammar.y#:		&& (id_Null -> id_last_definition == NIL)) {
./src/pass1/parser/#grammar.y#:        {  $$ = mklist( mknode(PARAMETER,NIL,$1), -1 ); }
./src/pass1/parser/#grammar.y#:	  $$ = mknode(TYPESIGNATURE,$10,$12,$5,$6,$7,NIL);
./src/pass1/parser/#grammar.y#:	  $$ = mknode(TYPESIGNATURE,$9,$11,$5,$6,$7,NIL);
./src/pass1/parser/#grammar.y#:	  $$ = mknode(TYPESIGNATURE,$7,$9,$5,NIL,NIL,NIL);
./src/pass1/parser/#grammar.y#:	  $$ = mknode(TYPESIGNATURE,$5,$7,NIL,NIL,NIL,NIL);
./src/pass1/parser/#grammar.y#:	  $$ = mknode(TYPESIGNATURE,$2,$4,NIL,NIL,NIL,NIL);
./src/pass1/parser/#grammar.y#:	    $$ = NIL;
./src/pass1/parser/#grammar.y#:	{ $$ = NIL; }
./src/pass1/parser/#grammar.y#:	    $$ = NIL;
./src/pass1/parser/#grammar.y#:	  if ($2 != NIL) {
./src/pass1/parser/#grammar.y#:        { $$ = NIL; }
./src/pass1/parser/#grammar.y#:                                NIL,  /* in-line code */
./src/pass1/parser/#grammar.y#:                                              NIL,
./src/pass1/parser/#grammar.y#:                                  NIL,  /* in-line code */
./src/pass1/parser/#grammar.y#:                                                NIL,
./src/pass1/parser/#grammar.y#:		$$ = insrtptr = mknode(BLOCKDENOTATION,emptylist(),NIL);
./src/pass1/parser/#grammar.y#:	{ $$ = mknode(MODPRIMARY,$1,$2,NIL); }
./src/pass1/parser/#grammar.y#:        { $$ = NIL; }
./src/pass1/parser/#grammar.y#:	  if ($1 -> fsig_result_sig == NIL) {
./src/pass1/parser/#grammar.y#:	  $$ = mknode(FUNCSIGNATURE, $3, $5, NIL);
./src/pass1/parser/#grammar.y#:	{ $$ = mknode(FUNCSIGNATURE, $2, $4, NIL); }
./src/pass1/parser/#grammar.y#:        { $$ = NIL; }
./src/pass1/parser/#grammar.y#:            if (s -> par_id == NIL) {
./src/pass1/parser/#grammar.y#:            if (s -> par_id == NIL) {
./src/pass1/parser/#grammar.y#:        { $$ = NIL; }
./src/pass1/parser/#grammar.y#:        { $$ = NIL; }
./src/pass1/parser/initids.tmp.rb:                                 NIL,
./src/pass1/parser/initids.tmp.rb:                                 NIL,
./src/pass1/parser/initids.tmp.rb:	sig_assign = lock( mknode(FUNCSIGNATURE, NIL, as_params,
./src/pass1/parser/initids.tmp.rb:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,
./src/pass1/parser/initids.tmp.rb:	    lock( mknode(FUNCSIGNATURE, NIL, two_params,val_Boolean) )
./src/pass1/parser/initids.tmp.rb:	sig_New = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.tmp.rb:	sig_const = lock( mknode(FUNCSIGNATURE, NIL, emptylist(),
./src/pass1/parser/initids.tmp.rb:	sig_ValueOf = lock( mknode(FUNCSIGNATURE, NIL,
./src/pass1/parser/y.tab.c:    NODE * insrtptr = NIL;  /* pointer to dummy BLOCKDENOTATION vertex into */
./src/pass1/parser/y.tab.c:    NODE * stxtree = NIL; /* pointer to root of syntax tree */
./src/pass1/parser/y.tab.c:    { if (stxtree != NIL) {
./src/pass1/parser/y.tab.c:		if ((yyvsp[(1) - (2)]) != NIL)
./src/pass1/parser/y.tab.c:                && (id_Boolean -> id_last_definition == NIL)) {
./src/pass1/parser/y.tab.c:                && (id_Void -> id_last_definition == NIL)) {
./src/pass1/parser/y.tab.c:                && (id_Integer -> id_last_definition == NIL)) {
./src/pass1/parser/y.tab.c:		&& (id_Null -> id_last_definition == NIL)) {
./src/pass1/parser/y.tab.c:    {  (yyval) = mklist( mknode(PARAMETER,NIL,(yyvsp[(1) - (1)])), -1 ); }
./src/pass1/parser/y.tab.c:	  (yyval) = mknode(TYPESIGNATURE,(yyvsp[(10) - (13)]),(yyvsp[(12) - (13)]),(yyvsp[(5) - (13)]),(yyvsp[(6) - (13)]),(yyvsp[(7) - (13)]),NIL);
./src/pass1/parser/y.tab.c:	  (yyval) = mknode(TYPESIGNATURE,(yyvsp[(9) - (12)]),(yyvsp[(11) - (12)]),(yyvsp[(5) - (12)]),(yyvsp[(6) - (12)]),(yyvsp[(7) - (12)]),NIL);
./src/pass1/parser/y.tab.c:	  (yyval) = mknode(TYPESIGNATURE,(yyvsp[(7) - (10)]),(yyvsp[(9) - (10)]),(yyvsp[(5) - (10)]),NIL,NIL,NIL);
./src/pass1/parser/y.tab.c:	  (yyval) = mknode(TYPESIGNATURE,(yyvsp[(5) - (8)]),(yyvsp[(7) - (8)]),NIL,NIL,NIL,NIL);
./src/pass1/parser/y.tab.c:	  (yyval) = mknode(TYPESIGNATURE,(yyvsp[(2) - (5)]),(yyvsp[(4) - (5)]),NIL,NIL,NIL,NIL);
./src/pass1/parser/y.tab.c:	    (yyval) = NIL;
./src/pass1/parser/y.tab.c:    { (yyval) = NIL; }
./src/pass1/parser/y.tab.c:	    (yyval) = NIL;
./src/pass1/parser/y.tab.c:	  if ((yyvsp[(2) - (6)]) != NIL) {
./src/pass1/parser/y.tab.c:    { (yyval) = NIL; }
./src/pass1/parser/y.tab.c:                                NIL,  /* in-line code */
./src/pass1/parser/y.tab.c:                                              NIL,
./src/pass1/parser/y.tab.c:                                  NIL,  /* in-line code */
./src/pass1/parser/y.tab.c:                                                NIL,
./src/pass1/parser/y.tab.c:		(yyval) = insrtptr = mknode(BLOCKDENOTATION,emptylist(),NIL);
./src/pass1/parser/y.tab.c:    { (yyval) = mknode(MODPRIMARY,(yyvsp[(1) - (2)]),(yyvsp[(2) - (2)]),NIL); }
./src/pass1/parser/y.tab.c:    { (yyval) = NIL; }
./src/pass1/parser/y.tab.c:	  if ((yyvsp[(1) - (5)]) -> fsig_result_sig == NIL) {
./src/pass1/parser/y.tab.c:	  (yyval) = mknode(FUNCSIGNATURE, (yyvsp[(3) - (6)]), (yyvsp[(5) - (6)]), NIL);
./src/pass1/parser/y.tab.c:    { (yyval) = mknode(FUNCSIGNATURE, (yyvsp[(2) - (5)]), (yyvsp[(4) - (5)]), NIL); }
./src/pass1/parser/y.tab.c:    { (yyval) = NIL; }
./src/pass1/parser/y.tab.c:            if (s -> par_id == NIL) {
./src/pass1/parser/y.tab.c:            if (s -> par_id == NIL) {
./src/pass1/parser/y.tab.c:    { (yyval) = NIL; }
./src/pass1/parser/y.tab.c:    { (yyval) = NIL; }
./src/main.c~:# define NIL ((NODE *)0)
./src/main.c~:    if (insrtptr == NIL) {
./src/main.c~:	if (insrtptr == NIL /* no previous initialization has taken place */) {
./src/main.c:# define NIL ((NODE *)0)
./src/main.c:    if (insrtptr == NIL) {
./src/main.c:	if (insrtptr == NIL /* no previous initialization has taken place */) {
./djd~:./src/pass4/findsig.c:                      par_list = mklist(mknode(PARAMETER, NIL, orig_sig), -1);
./djd~:./src/pass4/findsig.c:                      par_list = mklist(mknode(PARAMETER, NIL, new_sig), -1);
./djd~:./src/pass1/parser/grammar.y:        {  $$ = mklist( mknode(PARAMETER,NIL,$1), -1 ); }
./djd~:./src/pass1/parser/grammar.y~:        {  $$ = mklist( mknode(PARAMETER,NIL,$1), -1 ); }
./djd~:./src/pass1/parser/#grammar.y#:        {  $$ = mklist( mknode(PARAMETER,NIL,$1), -1 ); }
./djd~:./src/pass1/parser/y.tab.c:    {  (yyval) = mklist( mknode(PARAMETER,NIL,(yyvsp[(1) - (1)])), -1 ); }
./runtime/ref.c:#define REF_NIL ((struct obj *)(UNINIT))
./runtime/ref.c:    op -> obj_component[0] = (word) REF_NIL;
./runtime/ref.c:    return(REF_NIL);
